Changing the bindings files to have the #define of MPI_ functions to PMPI_ functions after the #pragma weak statement
This commit was SVN r1055.
Этот коммит содержится в:
родитель
49ea6ecf4b
Коммит
a0983ab473
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Abort = PMPI_Abort
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Abort(MPI_Comm comm, int errorcode) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Accumulate = PMPI_Accumulate
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Accumulate(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
|
||||
int target_rank, MPI_Aint target_disp, int target_count,
|
||||
MPI_Datatype target_datatype, MPI_Op op, MPI_Win win) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Add_error_class = PMPI_Add_error_class
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Add_error_class(int *errorclass) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Add_error_code = PMPI_Add_error_code
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Add_error_code(int errorclass, int *errorcode){
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Add_error_string = PMPI_Add_error_string
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Add_error_string(int errorcode, char *string){
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Address = PMPI_Address
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Address(void *location, MPI_Aint *address){
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Allgather = PMPI_Allgather
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Allgather(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
||||
void *recvbuf, int recvcount, MPI_Datatype recvtype,
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Allgatherv = PMPI_Allgatherv
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Allgatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
||||
void *recvbuf, int *recvcounts,
|
||||
int *displs, MPI_Datatype recvtype, MPI_Comm comm) {
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Alloc_mem = PMPI_Alloc_mem
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Alloc_mem(MPI_Aint size, MPI_Info info, void *baseptr)
|
||||
{
|
||||
if (size < 0) {
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Allreduce = PMPI_Allreduce
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Allreduce(void *sendbuf, void *recvbuf, int count,
|
||||
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Alltoall = PMPI_Alltoall
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Alltoall(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
||||
void *recvbuf, int recvcount,
|
||||
MPI_Datatype recvtype, MPI_Comm comm) {
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Alltoallv = PMPI_Alltoallv
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Alltoallv(void *sendbuf, int *sendcounts, int *sdispls,
|
||||
MPI_Datatype sendtype, void *recvbuf, int *recvcounts,
|
||||
int *rdispls, MPI_Datatype recvtype, MPI_Comm comm) {
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Alltoallw = PMPI_Alltoallw
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Alltoallw(void *sendbuf, int *sendcounts, int *sdispls, MPI_Datatype *sendtypes,
|
||||
void *recvbuf, int *recvcounts, int *rdispls, MPI_Datatype *recvtypes,
|
||||
MPI_Comm comm) {
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Attr_delete = PMPI_Attr_delete
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Attr_delete(MPI_Comm comm, int keyval)
|
||||
{
|
||||
int ret;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Attr_get = PMPI_Attr_get
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Attr_get(MPI_Comm comm, int keyval, void *attribute_val, int *flag)
|
||||
{
|
||||
int ret;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Attr_put = PMPI_Attr_put
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val)
|
||||
{
|
||||
int ret;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Barrier = PMPI_Barrier
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Barrier(MPI_Comm comm) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Bcast = PMPI_Bcast
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Bcast(void *buffer, int count, MPI_Datatype datatype,
|
||||
int root, MPI_Comm comm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -14,10 +14,6 @@
|
||||
doesn't work to simply list all of the pragmas in a top-level
|
||||
header file. */
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
/* This variable is actually in src/mpi/runtime/lam_mpi_init.c, but it
|
||||
is used by every MPI function. */
|
||||
|
||||
|
@ -14,6 +14,10 @@
|
||||
#pragma weak MPI_Bsend = PMPI_Bsend
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Bsend(void *buf, int count, MPI_Datatype type, int dest, int tag, MPI_Comm comm)
|
||||
{
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Bsend_init = PMPI_Bsend_init
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Bsend_init(void *buf, int count, MPI_Datatype type,
|
||||
int dest, int tag, MPI_Comm comm, MPI_Request *request)
|
||||
{
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Buffer_attach = PMPI_Buffer_attach
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Buffer_attach(void *buffer, int size) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Buffer_detach = PMPI_Buffer_detach
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Buffer_detach(void *buffer, int *size) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cancel = PMPI_Cancel
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cancel(MPI_Request *request) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_coords = PMPI_Cart_coords
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cart_coords(MPI_Comm comm, int rank, int maxdims, int *coords) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_create = PMPI_Cart_create
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cart_create(MPI_Comm old_comm, int ndims, int *dims,
|
||||
int *periods, int redorder, MPI_Comm *comm_cart) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_get = PMPI_Cart_get
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cart_get(MPI_Comm comm, int maxdims, int *dims,
|
||||
int *periods, int *coords) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_map = PMPI_Cart_map
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cart_map(MPI_Comm comm, int ndims, int *dims,
|
||||
int *periods, int *newrank) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_rank = PMPI_Cart_rank
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Cart_rank(MPI_Comm comm, int *coords, int *rank) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_shift = PMPI_Cart_shift
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Cart_shift(MPI_Comm comm, int direction, int disp,
|
||||
int *rank_source, int *rank_dest) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cart_sub = PMPI_Cart_sub
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Cart_sub(MPI_Comm comm, int *remain_dims, MPI_Comm *new_comm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Cartdim_get = PMPI_Cartdim_get
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Cartdim_get(MPI_Comm comm, int *ndims) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Close_port = PMPI_Close_port
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Close_port(char *port_name) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_accept = PMPI_Comm_accept
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_accept(char *port_name, MPI_Info info, int root,
|
||||
MPI_Comm comm, MPI_Comm *newcomm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_c2f = PMPI_Comm_c2f
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
MPI_Fint MPI_Comm_c2f(MPI_Comm comm) {
|
||||
/*
|
||||
* Anju:
|
||||
|
@ -12,6 +12,10 @@
|
||||
#if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
|
||||
#pragma weak MPI_Comm_call_errhandler = PMPI_Comm_call_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_call_errhandler(MPI_Comm comm, int errorcode)
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_compare = PMPI_Comm_compare
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_compare(MPI_Comm comm1, MPI_Comm comm2, int *result) {
|
||||
|
||||
/* local variables */
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_connect = PMPI_Comm_connect
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_connect(char *port_name, MPI_Info info, int root,
|
||||
MPI_Comm comm, MPI_Comm *newcomm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_create = PMPI_Comm_create
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_create(MPI_Comm comm, MPI_Group group, MPI_Comm *newcomm) {
|
||||
|
||||
int rc;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_create_errhandler = PMPI_Comm_create_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_create_errhandler(MPI_Comm_errhandler_fn *function,
|
||||
MPI_Errhandler *errhandler)
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Create_keyval = PMPI_Create_keyval
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_create_keyval(MPI_Comm_copy_attr_function *comm_copy_attr_fn,
|
||||
MPI_Comm_delete_attr_function *comm_delete_attr_fn,
|
||||
int *comm_keyval, void *extra_state)
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Comm_delete_attr = PMPI_Comm_delete_attr
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_delete_attr(MPI_Comm comm, int comm_keyval)
|
||||
{
|
||||
int ret;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_disconnect = PMPI_Comm_disconnect
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_disconnect(MPI_Comm *comm) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -14,6 +14,10 @@
|
||||
#pragma weak MPI_Comm_dup = PMPI_Comm_dup
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_dup(MPI_Comm comm, MPI_Comm *newcomm) {
|
||||
|
||||
/* local variables */
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_f2c = PMPI_Comm_f2c
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
MPI_Comm MPI_Comm_f2c(MPI_Fint comm) {
|
||||
/*
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_free = PMPI_Comm_free
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_free(MPI_Comm *comm) {
|
||||
|
||||
if ( MPI_PARAM_CHECK ) {
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Comm_free_keyval = PMPI_Comm_free_keyval
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_free_keyval(int *comm_keyval)
|
||||
{
|
||||
int ret;
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Comm_get_attr = PMPI_Comm_get_attr
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_get_attr(MPI_Comm comm, int comm_keyval,
|
||||
void *attribute_val, int *flag)
|
||||
{
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_get_errhandler = PMPI_Comm_get_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_get_errhandler(MPI_Comm comm, MPI_Errhandler *errhandler)
|
||||
{
|
||||
|
@ -17,6 +17,10 @@
|
||||
#pragma weak MPI_Comm_get_name = PMPI_Comm_get_name
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_get_name(MPI_Comm comm, char *name, int *length) {
|
||||
|
||||
lam_communicator_t* comp;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_get_parent = PMPI_Comm_get_parent
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_get_parent(MPI_Comm *parent) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_group = PMPI_Comm_group
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_group(MPI_Comm comm, MPI_Group *group) {
|
||||
|
||||
int rc;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_join = PMPI_Comm_join
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_join(int fd, MPI_Comm *intercomm) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_rank = PMPI_Comm_rank
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_rank(MPI_Comm comm, int *rank) {
|
||||
|
||||
|
@ -15,6 +15,10 @@
|
||||
#pragma weak MPI_Comm_remote_group = PMPI_Comm_remote_group
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_remote_group(MPI_Comm comm, MPI_Group *group) {
|
||||
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_remote_size = PMPI_Comm_remote_size
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_remote_size(MPI_Comm comm, int *size) {
|
||||
|
||||
|
@ -12,6 +12,10 @@
|
||||
#pragma weak MPI_Comm_set_attribute = PMPI_Comm_set_attribute
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val)
|
||||
{
|
||||
int ret;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_set_errhandler = PMPI_Comm_set_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Comm_set_errhandler(MPI_Comm comm, MPI_Errhandler errhandler)
|
||||
{
|
||||
|
@ -17,6 +17,10 @@
|
||||
#pragma weak MPI_Comm_set_name = PMPI_Comm_set_name
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_set_name(MPI_Comm comm, char *name) {
|
||||
|
||||
lam_communicator_t* comp;
|
||||
@ -51,6 +55,10 @@ int MPI_Comm_set_name(MPI_Comm comm, char *name) {
|
||||
++lam_tv_comm_sequence_number;
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
/* -- Thread safety exit -- */
|
||||
|
||||
return MPI_SUCCESS;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_size = PMPI_Comm_size
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_size(MPI_Comm comm, int *size) {
|
||||
|
||||
if ( MPI_PARAM_CHECK ) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_spawn = PMPI_Comm_spawn
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
|
||||
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
||||
int *array_of_errcodes) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Comm_spawn_multiple = PMPI_Comm_spawn_multiple
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_of_argv,
|
||||
int *array_of_maxprocs, MPI_Info *array_of_info,
|
||||
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_split = PMPI_Comm_split
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm *newcomm) {
|
||||
|
||||
int rc;
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Comm_test_inter = PMPI_Comm_test_inter
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Comm_test_inter(MPI_Comm comm, int *flag) {
|
||||
|
||||
if ( MPI_PARAM_CHECK ) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Dims_create = PMPI_Dims_create
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Dims_create(int nnodes, int ndims, int *dims) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Errhandler_c2f = PMPI_Errhandler_c2f
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
MPI_Fint MPI_Errhandler_c2f(MPI_Errhandler errhandler)
|
||||
{
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Errhandler_create = PMPI_Errhandler_create
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Errhandler_create(MPI_Handler_function *function,
|
||||
MPI_Errhandler *errhandler)
|
||||
{
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Errhandler_f2c = PMPI_Errhandler_f2c
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler_f)
|
||||
{
|
||||
|
@ -13,6 +13,10 @@
|
||||
#pragma weak MPI_Errhandler_free = PMPI_Errhandler_free
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Errhandler_free(MPI_Errhandler *errhandler)
|
||||
{
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Errhandler_get = PMPI_Errhandler_get
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Errhandler_get(MPI_Comm comm, MPI_Errhandler *errhandler)
|
||||
{
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Errhandler_set = PMPI_Errhandler_set
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
|
||||
int MPI_Errhandler_set(MPI_Comm comm, MPI_Errhandler errhandler)
|
||||
{
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Error_class = PMPI_Error_class
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Error_class(int errorcode, int *errorclass) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Error_string = PMPI_Error_string
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Error_string(int errorcode, char *string, int *resultlen) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_Exscan = PMPI_Exscan
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_Exscan(void *sendbuf, void *recvbuf, int count,
|
||||
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_c2f = PMPI_File_c2f
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
MPI_Fint MPI_File_c2f(MPI_File file) {
|
||||
return (MPI_Fint)0;
|
||||
}
|
||||
|
@ -14,6 +14,10 @@
|
||||
#pragma weak MPI_File_call_errhandler = PMPI_File_call_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_call_errhandler(MPI_File fh, int errorcode) {
|
||||
/* Error checking */
|
||||
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_close = PMPI_File_close
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_close(MPI_File *fh) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -14,6 +14,10 @@
|
||||
#pragma weak MPI_File_create_errhandler = PMPI_File_create_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_create_errhandler(MPI_File_errhandler_fn *function,
|
||||
MPI_Errhandler *errhandler) {
|
||||
int err = MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_delete = PMPI_File_delete
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_delete(char *filename, MPI_Info info) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_f2c = PMPI_File_f2c
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
MPI_File MPI_File_f2c(MPI_Fint file) {
|
||||
return (MPI_File)0;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_amode = PMPI_File_get_amode
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_amode(MPI_File fh, int *amode) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_atomicity = PMPI_File_get_atomicity
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_atomicity(MPI_File fh, int *flag) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_byte_offset = PMPI_File_get_byte_offset
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_byte_offset(MPI_File fh, MPI_Offset offset,
|
||||
MPI_Offset *disp) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -14,6 +14,10 @@
|
||||
#pragma weak MPI_File_get_errhandler = PMPI_File_get_errhandler
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_errhandler( MPI_File file, MPI_Errhandler *errhandler) {
|
||||
/* Error checking */
|
||||
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_group = PMPI_File_get_group
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_group(MPI_File fh, MPI_Group *group) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_info = PMPI_File_get_info
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_info(MPI_File fh, MPI_Info *info_used) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_position = PMPI_File_get_position
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_position(MPI_File fh, MPI_Offset *offset) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_position_shared = PMPI_File_get_position_shared
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_position_shared(MPI_File fh, MPI_Offset *offset) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_size = PMPI_File_get_size
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_size(MPI_File fh, MPI_Offset *size) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_type_extent = PMPI_File_get_type_extent
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_type_extent(MPI_File fh, MPI_Datatype datatype,
|
||||
MPI_Aint *extent) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_get_view = PMPI_File_get_view
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_get_view(MPI_File fh, MPI_Offset *disp,
|
||||
MPI_Datatype *etype,
|
||||
MPI_Datatype *filetype, char *datarep) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iread = PMPI_File_iread
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iread(MPI_File fh, void *buf, int count, MPI_Datatype
|
||||
datatype, MPI_Request *request) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iread_at = PMPI_File_iread_at
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iread_at(MPI_File fh, MPI_Offset offset, void *buf,
|
||||
int count, MPI_Datatype datatype, MPI_Request *request) {
|
||||
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iread_shared = PMPI_File_iread_shared
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iread_shared(MPI_File fh, void *buf, int count,
|
||||
MPI_Datatype datatype, MPI_Request *request) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iwrite = PMPI_File_iwrite
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iwrite(MPI_File fh, void *buf, int count, MPI_Datatype
|
||||
datatype, MPI_Request *request) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iwrite_at = PMPI_File_iwrite_at
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iwrite_at(MPI_File fh, MPI_Offset offset, void *buf,
|
||||
int count, MPI_Datatype datatype,
|
||||
MPI_Request *request) {
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_iwrite_shared = PMPI_File_iwrite_shared
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_iwrite_shared(MPI_File fh, void *buf, int count,
|
||||
MPI_Datatype datatype, MPI_Request *request) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_open = PMPI_File_open
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_open(MPI_Comm comm, char *filename, int amode,
|
||||
MPI_Info info, MPI_File *fh) {
|
||||
return MPI_SUCCESS;
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_preallocate = PMPI_File_preallocate
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_preallocate(MPI_File fh, MPI_Offset size) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
@ -11,6 +11,10 @@
|
||||
#pragma weak MPI_File_read = PMPI_File_read
|
||||
#endif
|
||||
|
||||
#if LAM_PROFILING_DEFINES
|
||||
#include "mpi/c/profile/defines.h"
|
||||
#endif
|
||||
|
||||
int MPI_File_read(MPI_File fh, void *buf, int count, MPI_Datatype
|
||||
datatype, MPI_Status *status) {
|
||||
return MPI_SUCCESS;
|
||||
|
Некоторые файлы не были показаны из-за слишком большого количества измененных файлов Показать больше
Загрузка…
x
Ссылка в новой задаче
Block a user