- update

land-info-lab · Oct 30, 2023 · 24cc3c6 · 24cc3c6
1 parent 224bf36
commit 24cc3c6
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/multiLabel.cpp b/src/multiLabel.cpp
@@ -19,7 +19,7 @@ Rcpp::List multiLabel(Rcpp::NumericMatrix &vpts,
   const int vptnum = vpts.rows();
   Rcpp::List output(vptnum);
   #ifdef _WIN32
-    #pragma omp parallel shared(output, dsm_list, max_dis, vpth, h, vptnum) num_threads(workers)
+    #pragma omp parallel shared(output, dsm_list, max_dis, vpth, h, vptnum) num_threads(workers) for
       for (int i = 0; i < vptnum; i++) {
         const Rcpp::NumericMatrix sub_dsm = dsm_list[i];
         int vx = vpts(i,0);
@@ -35,7 +35,6 @@ Rcpp::List multiLabel(Rcpp::NumericMatrix &vpts,
 
         int steps;
         Rcpp::IntegerMatrix visible(sub_rows, sub_cols);
-        #pragma omp critical
         for (int j = 0; j < sub_rows; j++) {
           for (int k = 0; k < sub_cols; k++) {
             steps = sqrt((vx-k)*(vx-k) + (vy-j)*(vy-j));
@@ -67,6 +66,7 @@ Rcpp::List multiLabel(Rcpp::NumericMatrix &vpts,
             }
           }
         }
+        #pragma omp critical
         output[i] = visible;
       }
   #endif