commit d1c5feec765aedab6e07315cb334160724d44591
author Johannes Doerfert <johannes@jdoerfert.de> Wed Oct 20 10:37:50 2021 -0500
committer Copybara-Service <copybara-worker@google.com> Wed Oct 27 16:25:25 2021 -0700
tree 5d40f0336a48856754f0fa914ad0f5b211ad5a7e
parent 77badd65a74d29baf4e61b8d0566ae5e4ae3c30c

[OpenMP][FIX] Do not adjust the level after the environment was popped

Exiting a data environment will reset all values, it is wrong to adjust
them afterwards.

Reviewed By: tianshilei1992

Differential Revision: https://reviews.llvm.org/D112144

GitOrigin-RevId: 5102c3c61e266b533619644bb8eb27cecd26bfca

libomptarget/DeviceRTL/src/Parallelism.cpp

diff --git a/libomptarget/DeviceRTL/src/Parallelism.cpp b/libomptarget/DeviceRTL/src/Parallelism.cpp
index 81af773..bfdee1c 100644
--- a/libomptarget/DeviceRTL/src/Parallelism.cpp
+++ b/libomptarget/DeviceRTL/src/Parallelism.cpp
@@ -199,7 +199,6 @@
 
 void __kmpc_end_serialized_parallel(IdentTy *, uint32_t TId) {
   state::exitDataEnvironment();
-  --icv::Level;
 }
 
 uint16_t __kmpc_parallel_level(IdentTy *, uint32_t) { return omp_get_level(); }