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

jdoerfert · jdoerfert · commit 5102c3c61e26 · 2021-10-27T18:22:33.000-05:00
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
diff --git a/openmp/libomptarget/DeviceRTL/src/Parallelism.cpp b/openmp/libomptarget/DeviceRTL/src/Parallelism.cpp
@@ -199,7 +199,6 @@ void __kmpc_serialized_parallel(IdentTy *, uint32_t TId) {
 
 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(); }

Original file line number	Diff line number	Diff line change
`@@ -199,7 +199,6 @@ void __kmpc_serialized_parallel(IdentTy *, uint32_t TId) {`
`199`	`199`
`200`	`200`	`void __kmpc_end_serialized_parallel(IdentTy *, uint32_t TId) {`
`201`	`201`	`state::exitDataEnvironment();`
`202`		`- --icv::Level;`
`203`	`202`	`}`
`204`	`203`
`205`	`204`	`uint16_t __kmpc_parallel_level(IdentTy *, uint32_t) { return omp_get_level(); }`