[flang-commits] [flang] [llvm] [OpenMP][Flang] Fix dynamic-extent array mapping (PR #107247)

[via flang-commits]

================
@@ -0,0 +1,33 @@
+! Offloading test checking lowering of arrays with dynamic extents.
+! REQUIRES: flang, amdgpu
+
+! RUN: %libomptarget-compile-fortran-run-and-check-generic
+
+subroutine test_array_target_enter_data(dims)
+    integer, intent(in) :: dims(2)
+    double precision :: A(2, dims(2))
+    !$omp target enter data map(to: U)
----------------
agozillon wrote:

It should be, thank you for the catch! I've done the same mistake a few times and seen it in a few other tests, and now I always use implicit none... :-) 

https://github.com/llvm/llvm-project/pull/107247