Fix ifunc detection in target-supports.exp file.

[official-gcc.git] / libgomp / testsuite / libgomp.fortran / use_intrinsic_1.f90

! { dg-do compile }
!
! PR fortran/55197
!
! Contributed by Erik Toussaint
!

use, intrinsic :: omp_lib, only: omp_get_num_threads
use, intrinsic :: omp_lib_kinds , foo => omp_lock_kind
print *, foo
end