[Openmp-commits] [openmp] 99335a6 - [flang][OpenMP] Add missing implementation for 'omp_is_initial_device' (#83056)

[via Openmp-commits]

Author: Michael Klemm
Date: 2024-02-26T13:17:33-08:00
New Revision: 99335a646bc0b10066d77cec08ae8cab0162efde

URL: https://github.com/llvm/llvm-project/commit/99335a646bc0b10066d77cec08ae8cab0162efde
DIFF: https://github.com/llvm/llvm-project/commit/99335a646bc0b10066d77cec08ae8cab0162efde.diff

LOG: [flang][OpenMP] Add missing implementation for 'omp_is_initial_device' (#83056)

Resolve issue #82047

Added: 
    

Modified: 
    openmp/libomptarget/DeviceRTL/src/State.cpp

Removed: 
    


################################################################################
diff  --git a/openmp/libomptarget/DeviceRTL/src/State.cpp b/openmp/libomptarget/DeviceRTL/src/State.cpp
index 40f99e07b44c1c..a1e4fa2449d9a2 100644
--- a/openmp/libomptarget/DeviceRTL/src/State.cpp
+++ b/openmp/libomptarget/DeviceRTL/src/State.cpp
@@ -426,6 +426,8 @@ int omp_get_num_teams(void) { return mapping::getNumberOfBlocksInKernel(); }
 int omp_get_team_num() { return mapping::getBlockIdInKernel(); }
 
 int omp_get_initial_device(void) { return -1; }
+
+int omp_is_initial_device(void) { return 0; }
 }
 
 extern "C" {