-// Copyright (C) 2007-2008 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.
+// 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, 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
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-// Lesser General Public License for more details.
+// This library is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+// Lesser General Public License for more details.
//
-// You should have received a copy of the GNU Lesser General Public
-// License along with this library; if not, write to the Free Software
-// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+// You should have received a copy of the GNU Lesser General Public
+// License along with this library; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
//
-// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
+// See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
//
+
#ifndef __MPIACCESS_HXX__
#define __MPIACCESS_HXX__
};
- 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
}
// Returns true if the tag MPITag corresponds to a TimeMessage
- inline bool MPIAccess::isTimeMessage( int MPITag ) 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
+ inline bool MPIAccess::isTimeMessage( int aMPITag ) 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 ;
}
// 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 ;