Various fixes for test runs - introducing MEDCOUPLING_RESOURCE_DIR env variable

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

diff --git a/src/ParaMEDMEMTest/test_MPI_Access_Cancel.cxx b/src/ParaMEDMEMTest/test_MPI_Access_Cancel.cxx
index bcbeda7bded88d32c53b4efc731e8e668ec6aec3..ccd7146f5ebad8f0538e5277adb52a386565a41e 100644 (file)
--- a/src/ParaMEDMEMTest/test_MPI_Access_Cancel.cxx
+++ b/src/ParaMEDMEMTest/test_MPI_Access_Cancel.cxx
@@ -1,4 +1,4 @@
-// Copyright (C) 2007-2016  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
@@ -58,7 +58,7 @@ void MPIAccessTest::test_MPI_Access_Cancel() {
 
   if ( size < 2 ) {
     ostringstream strstream ;
-    strstream << "test_MPI_Access_Cancel must be runned with 2 procs" << endl ;
+    strstream << "test_MPI_Access_Cancel must be run with 2 procs" << endl ;
     cerr << strstream.str() << endl ;
     //CPPUNIT_FAIL( strstream.str() ) ;
     return;
@@ -82,7 +82,7 @@ void MPIAccessTest::test_MPI_Access_Cancel() {
   int intsendbuf[5] ;
   double doublesendbuf[10] ;
   int RequestId[10] ;
-  int sts ;
+  int sts = 0;
   int i , j ;
   for ( j = 0 ; j < 3 ; j++ ) {
      for ( i = 0 ; i < 10 ; i++ ) {
@@ -124,7 +124,7 @@ void MPIAccessTest::test_MPI_Access_Cancel() {
                  sts = mpi_access.IRecv(&recvbuf,outcount,MPI_INT,source,
                                         RequestId[i] ) ;
                  if ( datatype == MPI_INT ) {
-                   int source, tag, error, outcount ;
+                   int error;
                    mpi_access.wait( RequestId[i] ) ;
                    mpi_access.status( RequestId[i], source, tag, error, outcount,
                                       true ) ;