aboutsummaryrefslogtreecommitdiff
path: root/libgomp/testsuite/libgomp.fortran
diff options
context:
space:
mode:
Diffstat (limited to 'libgomp/testsuite/libgomp.fortran')
-rw-r--r--libgomp/testsuite/libgomp.fortran/use_intrinsic_1.f9011
1 files changed, 11 insertions, 0 deletions
diff --git a/libgomp/testsuite/libgomp.fortran/use_intrinsic_1.f90 b/libgomp/testsuite/libgomp.fortran/use_intrinsic_1.f90
new file mode 100644
index 00000000000..5996350301b
--- /dev/null
+++ b/libgomp/testsuite/libgomp.fortran/use_intrinsic_1.f90
@@ -0,0 +1,11 @@
+! { 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