[llvm] [openmp] Reland: [OpenMP] Implement omp_get_uid_from_device() / omp_get_device_from_uid() (PR #168554)

[Robert Imschweiler via llvm-commits]

================
@@ -491,13 +491,15 @@
 
         function omp_get_uid_from_device(device_num) bind(c)
----------------
ro-i wrote:

could you elaborate on what exactly doesn't match in these Fortran declarations, please?

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