Various fixes for test runs - introducing MEDCOUPLING_RESOURCE_DIR env variable

[tools/medcoupling.git] / src / ParaMEDMEMTest / test_MPI_Access_ISend_IRecv_Length.cxx

diff --git a/src/ParaMEDMEMTest/test_MPI_Access_ISend_IRecv_Length.cxx b/src/ParaMEDMEMTest/test_MPI_Access_ISend_IRecv_Length.cxx
index 36dbb89fc7f6c619c34bd576a3efa4106c07f0c5..5ba6afe14d2b3661e8c59c7e7f7f5044c9ae4bda 100644 (file)
--- a/src/ParaMEDMEMTest/test_MPI_Access_ISend_IRecv_Length.cxx
+++ b/src/ParaMEDMEMTest/test_MPI_Access_ISend_IRecv_Length.cxx
@@ -1,4 +1,4 @@
-// Copyright (C) 2007-2015  CEA/DEN, EDF R&D
+// Copyright (C) 2007-2020  CEA/DEN, EDF R&D
 //
 // This library is free software; you can redistribute it and/or
 // modify it under the terms of the GNU Lesser General Public
@@ -53,7 +53,7 @@ void MPIAccessTest::test_MPI_Access_ISend_IRecv_Length() {
 
   if ( size < 2 ) {
     ostringstream strstream ;
-    strstream << "test_MPI_Access_ISend_IRecv_Length must be runned with 2 procs" << endl ;
+    strstream << "test_MPI_Access_ISend_IRecv_Length must be run with 2 procs" << endl ;
     cerr << strstream.str() << endl ;
     //CPPUNIT_FAIL( strstream.str() ) ;
     return;
@@ -107,12 +107,12 @@ void MPIAccessTest::test_MPI_Access_ISend_IRecv_Length() {
         mpi_access.test( RecvRequestId[j], flag ) ;
       }
       if ( flag ) {
-        int target,source, tag, error, outcount ;
+        int target2,source, tag, error, outcount ;
         if ( myrank == 0 ) {
-          mpi_access.status( SendRequestId[j], target, tag, error, outcount,
+          mpi_access.status( SendRequestId[j], target2, tag, error, outcount,
                              true ) ;
           debugStream << "test" << myrank << " Test(Send RequestId " << SendRequestId[j]
-               << ") : target " << target << " tag " << tag << " error " << error
+               << ") : target " << target2 << " tag " << tag << " error " << error
                << " flag " << flag << endl ;
         }
         else {