Changes between Version 16 and Version 17 of OpenMPTransformation

Timestamp:

04/20/14 20:37:21 (12 years ago)

Author:

siegel

Comment:

--

OpenMPTransformation

@@ -67 +67 @@
  * a pair consisting of a global work-sharing handle and
  * a thread id. */
-$omp_ws $omp_ws_create($omp_gws, int tid);
+$omp_ws $omp_ws_create($scope scope, $omp_gws, int tid);
 
 $omp_ws_destroy($omp_ws ws);
@@ -120 +120 @@
     $proc _threads[_nthreads];
     $omp_gws _gws = $omp_gws_create($here, _nthreads);
+    $gbarrier _gbarrier = $gbarrier_create($here, _nthreads);
     void _thread(int _tid) {
-      $omp_ws _ws = $omp_ws_create(_gws, _tid);
+      $omp_ws _ws = $omp_ws_create($here, _gws, _tid);
+      $barrier _barrier = $barrier_create($here, _gbarrier, tid);
 
       translate(S)
@@ -158 +160 @@
     translate(S);
   }
-  $barrier...
+  $barrier_call(_barrier);
 }
 }}}
@@ -198 +200 @@
     } /* end of switch */
   } /* end of while loop */
-  $barrier...
+  $barrier_call(_barrier);
 }
 }}}
@@ -217 +219 @@
   translate(S);
 }
-$barrier...
+$barrier_call(_barrier);
 }}}
 
@@ -232 +234 @@
 {{{
 $omp_barrier_arrive(_ws, 58);
-$barrier...
+$barrier_call(_barrier);
 }}}