/usr/include/lam/mpi2cxx/status_inln.h is in lam4-dev 7.1.4-3.1build1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 | // -*- c++ -*-
//
// $Id: status_inln.h,v 1.3 2002/10/09 20:57:38 brbarret Exp $
//
// Copyright (c) 2001-2002 The Trustees of Indiana University.
// All rights reserved.
// Copyright (c) 1998-2001 University of Notre Dame.
// All rights reserved.
// Copyright (c) 1994-1998 The Ohio State University.
// All rights reserved.
//
// This file is part of the LAM/MPI software package. For license
// information, see the LICENSE file in the top level directory of the
// LAM/MPI source distribution.
//
// $HEADER$
//
//
// Point-to-Point Communication
//
inline int
_REAL_MPI_::Status::Get_count(const _REAL_MPI_::Datatype& datatype) const
{
int count;
//(MPI_Status*) is to cast away the const
(void)MPI_Get_count((MPI_Status*)&mpi_status, datatype, &count);
return count;
}
inline bool
_REAL_MPI_::Status::Is_cancelled() const
{
int t;
(void)MPI_Test_cancelled((MPI_Status*)&mpi_status, &t);
return (bool) t;
}
inline int
_REAL_MPI_::Status::Get_elements(const _REAL_MPI_::Datatype& datatype) const
{
int count;
(void)MPI_Get_elements((MPI_Status*)&mpi_status, datatype, &count);
return count;
}
//
// Status Access
//
inline int
_REAL_MPI_::Status::Get_source() const
{
int source;
source = mpi_status.MPI_SOURCE;
return source;
}
inline void
_REAL_MPI_::Status::Set_source(int source)
{
mpi_status.MPI_SOURCE = source;
}
inline int
_REAL_MPI_::Status::Get_tag() const
{
int tag;
tag = mpi_status.MPI_TAG;
return tag;
}
inline void
_REAL_MPI_::Status::Set_tag(int tag)
{
mpi_status.MPI_TAG = tag;
}
inline int
_REAL_MPI_::Status::Get_error() const
{
int error;
error = mpi_status.MPI_ERROR;
return error;
}
inline void
_REAL_MPI_::Status::Set_error(int error)
{
mpi_status.MPI_ERROR = error;
}
|