Commit 6617678c authored by incardon's avatar incardon

Fixing 256 processors

parent 3bd67863
...@@ -77,15 +77,15 @@ then ...@@ -77,15 +77,15 @@ then
make make
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
salloc --nodes=1 --ntasks-per-node=16 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 16 src/vcluster salloc -n16 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 16 src/vcluster
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
salloc --nodes=2 --ntasks-per-node=16 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 32 src/vcluster salloc -n=32 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 32 src/vcluster
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
salloc --nodes=4 --ntasks-per-node=16 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 64 src/vcluster salloc -n=64 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 64 src/vcluster
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
salloc --nodes=8 --ntasks-per-node=16 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 128 src/vcluster salloc -n=128 --time=00:05:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 128 src/vcluster
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
salloc --nodes=16 --ntasks-per-node=16 --time=00:5:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 256 src/vcluster salloc -n=256 --time=00:5:00 --mem-per-cpu=1900 --partition=sandy mpirun -np 256 src/vcluster
if [ $? -ne 0 ]; then exit 1 ; fi if [ $? -ne 0 ]; then exit 1 ; fi
else else
......
...@@ -100,7 +100,7 @@ AC_CHECK_LIB(rt, clock_gettime,[DEFAULT_LIB+=" -lrt "],[],[]) ...@@ -100,7 +100,7 @@ AC_CHECK_LIB(rt, clock_gettime,[DEFAULT_LIB+=" -lrt "],[],[])
##### CHECK FOR BOOST ############## ##### CHECK FOR BOOST ##############
AX_BOOST([1.41],[],[]) AX_BOOST([1.52],[],[])
####### Checking for GPU support ####### Checking for GPU support
......
...@@ -453,6 +453,10 @@ public: ...@@ -453,6 +453,10 @@ public:
sendrecvMultipleMessagesPCX(prc.size(),(size_t *)map.getPointer(),(size_t *)sz_send.getPointer(),(size_t *)prc.getPointer(),(void **)ptr_send.getPointer(),msg_alloc,ptr_arg,opt); sendrecvMultipleMessagesPCX(prc.size(),(size_t *)map.getPointer(),(size_t *)sz_send.getPointer(),(size_t *)prc.getPointer(),(void **)ptr_send.getPointer(),msg_alloc,ptr_arg,opt);
} }
MPI_Request bar_req;
// barrier status
MPI_Status bar_stat;
/*! \brief Send and receive multiple messages local /*! \brief Send and receive multiple messages local
* *
* It send multiple messages to the near processor the and receive * It send multiple messages to the near processor the and receive
...@@ -508,7 +512,6 @@ public: ...@@ -508,7 +512,6 @@ public:
int flag = false; int flag = false;
bool reached_bar_req = false; bool reached_bar_req = false;
MPI_Request bar_req;
log.start(10); log.start(10);
...@@ -556,9 +559,6 @@ public: ...@@ -556,9 +559,6 @@ public:
{MPI_SAFE_CALL(MPI_Ibarrier(MPI_COMM_WORLD,&bar_req));reached_bar_req = true;} {MPI_SAFE_CALL(MPI_Ibarrier(MPI_COMM_WORLD,&bar_req));reached_bar_req = true;}
} }
// barrier status
MPI_Status bar_stat;
// Check if all processor reached the async barrier // Check if all processor reached the async barrier
if (reached_bar_req) if (reached_bar_req)
{MPI_SAFE_CALL(MPI_Test(&bar_req,&flag,&bar_stat))}; {MPI_SAFE_CALL(MPI_Test(&bar_req,&flag,&bar_stat))};
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment