From 9063dd2373225196b85f61833b8caa4b1ef40c56 Mon Sep 17 00:00:00 2001
From: Erik Schnetter <schnetter@gmail.com>
Date: Sat, 5 May 2012 07:52:56 -0400
Subject: CarpetLib: Disable OpenMP collapse statements

These do not work on all systems, and we don't autoconf them yet.
---
 CarpetDev/CarpetIOF5/src/distribute.cc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'CarpetDev')

diff --git a/CarpetDev/CarpetIOF5/src/distribute.cc b/CarpetDev/CarpetIOF5/src/distribute.cc
index 66ad0715f..05658ee42 100644
--- a/CarpetDev/CarpetIOF5/src/distribute.cc
+++ b/CarpetDev/CarpetIOF5/src/distribute.cc
@@ -537,7 +537,7 @@ namespace CarpetIOF5 {
         ptrdiff_t const ind0s = i0s * dis + j0s * djs + k0s * dks;
         char const *const src = &((char const*)data)[vartypesize * ind0s];
         
-#pragma omp parallel for collapse(2)
+#pragma omp parallel for //collapse(2)
         for (ptrdiff_t k=0; k<nk; ++k) {
           for (ptrdiff_t j=0; j<nj; ++j) {
             ptrdiff_t const ind = j*dj + k*dk;
@@ -614,7 +614,7 @@ namespace CarpetIOF5 {
     assert(data.has_storage());
     char *const dst = &((char*)data.storage())[ind0d];
     
-#pragma omp parallel for collapse(2)
+#pragma omp parallel for //collapse(2)
     for (ptrdiff_t k=0; k<nk; ++k) {
       for (ptrdiff_t j=0; j<nj; ++j) {
         ptrdiff_t const indd = j*djd + k*dkd;
-- 
cgit v1.2.3