Added APP_ABORT in case multiple openMP threads are enabled

git-svn-id: https://subversion.assembla.com/svn/qmcdev/trunk@6638 e5b18d87-469d-4833-9cc0-8cdfa06e9491
This commit is contained in:
Raymond Clay 2015-12-16 18:08:52 +00:00
parent 25c42b85f3
commit 3c6b0ed9c8
1 changed files with 6 additions and 1 deletions

View File

@ -275,10 +275,14 @@ void CSVMC::resetRun()
makeClones(W,Psi1,H1);
FairDivideLow(W.getActiveWalkers(),NumThreads,wPerNode);
if(NumThreads>1) APP_ABORT("OpenMP Parallelization for CSVMC not working at the moment");
app_log() << " Initial partition of walkers ";
std::copy(wPerNode.begin(),wPerNode.end(),ostream_iterator<int>(app_log()," "));
app_log() << endl;
if(Movers.empty())
{
CSMovers.resize(NumThreads,0);
@ -286,7 +290,8 @@ void CSVMC::resetRun()
estimatorClones.resize(NumThreads,0);
traceClones.resize(NumThreads,0);
Rng.resize(NumThreads,0);
#if !defined(BGP_BUG)
#pragma omp parallel for
#endif