Salome HOME
MEDFileFields::LoadSpecificEntities to improve perf when reading lots of TS.
[tools/medcoupling.git] / src / ParaMEDMEM / MPIAccess.hxx
index b390b4299e9ff012c8b24569cfa736e8b59d0d76..9f4eea74400aef85f5b1a1c92134031e2d988bf0 100644 (file)
@@ -1,9 +1,9 @@
-// Copyright (C) 2007-2013  CEA/DEN, EDF R&D
+// Copyright (C) 2007-2015  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
 // License as published by the Free Software Foundation; either
-// version 2.1 of the License.
+// version 2.1 of the License, or (at your option) any later version.
 //
 // This library is distributed in the hope that it will be useful,
 // but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -181,9 +181,9 @@ namespace ParaMEDMEM
 
   };
 
-  inline void MPIAccess::trace( bool trace )
+  inline void MPIAccess::trace( bool atrace )
   {
-    _trace = trace ;
+    _trace = atrace ;
   }
 
   // Delete the structure Request corresponding to RequestId identifier after
@@ -254,43 +254,19 @@ namespace ParaMEDMEM
   }
   
   // Returns true if the tag MPITag corresponds to a TimeMessage
-  inline bool MPIAccess::isTimeMessage( int MPITag ) const
+  inline bool MPIAccess::isTimeMessage( int aMPITag ) const
   {
-    return ((MPITag%MODULO_TAG) == _message_time) ;
-  }
-
-  // Returns the MPI size of a TimeMessage
-  inline MPI_Aint MPIAccess::timeExtent() const
-  {
-    MPI_Aint extent ;
-    MPI_Type_extent( _MPI_TIME , &extent ) ;
-    return extent ;
-  }
-
-  // Returns the MPI size of a MPI_INT
-  inline MPI_Aint MPIAccess::intExtent() const
-  {
-    MPI_Aint extent ;
-    MPI_Type_extent( MPI_INT , &extent ) ;
-    return extent ;
-  }
-
-  // Returns the MPI size of a MPI_DOUBLE
-  inline MPI_Aint MPIAccess::doubleExtent() const
-  {
-    MPI_Aint extent ;
-    MPI_Type_extent( MPI_DOUBLE , &extent ) ;
-    return extent ;
+    return ((aMPITag%MODULO_TAG) == _message_time) ;
   }
 
   // Returns the MPI size of the MPI_Datatype datatype
-  inline MPI_Aint MPIAccess::extent( MPI_Datatype datatype ) const
+  inline MPI_Aint MPIAccess::extent( MPI_Datatype adatatype ) const
   {
-    if ( datatype == _MPI_TIME )
+    if ( adatatype == _MPI_TIME )
       return timeExtent() ;
-    if ( datatype == MPI_INT )
+    if ( adatatype == MPI_INT )
       return intExtent() ;
-    if ( datatype == MPI_DOUBLE )
+    if ( adatatype == MPI_DOUBLE )
       return doubleExtent() ;
     return 0 ;
   }
@@ -450,14 +426,14 @@ namespace ParaMEDMEM
 
   // Returns the _MessageIdent enum value corresponding to the MPI_Datatype datatype
   // Look at MPIAccess::NewSendTag/NewRecvTag in MPIAccess.cxx
-  inline _MessageIdent MPIAccess::methodId( MPI_Datatype datatype ) const
+  inline _MessageIdent MPIAccess::methodId( MPI_Datatype adatatype ) const
   {
     _MessageIdent aMethodIdent ;
-    if ( datatype == _MPI_TIME )
+    if ( adatatype == _MPI_TIME )
       aMethodIdent = _message_time;
-    else if ( datatype == MPI_INT )
+    else if ( adatatype == MPI_INT )
       aMethodIdent = _message_int ;
-    else if ( datatype == MPI_DOUBLE )
+    else if ( adatatype == MPI_DOUBLE )
       aMethodIdent = _message_double ;
     else
       aMethodIdent = _message_unknown ;