Ejemplo n.º 1
0
void POMP_End(struct ompregdescr* r) {
  struct VTRegDescr* data = (struct VTRegDescr*)(r->data);

  if ( IS_POMP_TRACE_ON )
  {
    uint64_t time;
    time = vt_pform_wtime();
    vt_exit(VT_CURRENT_THREAD, &time);
  }
  if ( data->rid == main_rid ) POMP_Finalize();
}
Ejemplo n.º 2
0
VT_DECLDEF(void POMP_Finalize_f(void)) {
  POMP_Finalize();
} VT_GENERATE_F77_BINDINGS(pomp_finalize, POMP_FINALIZE,