Function ScoreMetaCallback

test/openmp-2.cpp:62–111

}

void
ScoreMetaCallback()
{
  omp_set_num_threads(NumThreads);

  // DMTCP hangs with this uncommented:
        #pragma omp critical(ScoreMetaCallback)
  {
    memarray = new int *[size3];

    // gcc 4.2 and 4.3 implement OpenMP 2.5. gcc 4.4 and later implement OpenMP
    // 3.0
    // Some distros (Red Hat?, Open Suse?) backported OpenMP to gcc 4.1
    // OpenMP 2.5 requires 'signed int'
#if __GNUC__ == 4 && __GNUC_MINOR__ < 4
    int m = 0;
#else // if __GNUC__ == 4 && __GNUC_MINOR__ < 4
    unsigned int m = 0;
#endif // if __GNUC__ == 4 && __GNUC_MINOR__ < 4

                #pragma omp parallel for \
    private(m)                           \
    schedule(static)
    for (m = 0; m < size3; m++) {
      // cout << "add m: " << m << endl;
      memarray[m] = new int[size4];
    }

                #pragma omp parallel for \
    private(m)                           \
    schedule(static)
    for (m = 0; m < size3; m++) {
      if (m % 1000 == 0) {
        cout << "m: " << m << endl;
      }
      ScoreCallback(m);
    }


                #pragma omp parallel for \
    private(m)                           \
    schedule(static)
    for (m = 0; m < size3; m++) {
      // cout << "del m: " << m << endl;
      delete[] memarray[m];
    }

    delete[] memarray;
  }
}

void
ScoreCallback(unsigned int m)