[flang][OpenMP] Add missing implementation for 'omp_is_initial_device' (

#83056) Resolve issue #82047
llvm · Feb 26, 2024 · 99335a6 · 99335a6
1 parent 860b6ed
commit 99335a6
Showing 1 changed file with 2 additions and 0 deletions.
diff --git 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" {