1! { dg-do compile } 2! 3! PR fortran/55197 4! 5! Contributed by Erik Toussaint 6! 7 8use, intrinsic :: omp_lib, only: omp_get_num_threads 9use, intrinsic :: omp_lib_kinds , foo => omp_lock_kind 10print *, foo 11end 12