adding new functions:k and l
This commit was SVN r542.
Этот коммит содержится в:
Prabhanjan Kambadur
родитель
4dd216aaec
Коммит
8d08a67f45
@ -637,36 +637,46 @@ extern "C" {
|
||||
MPI_Group group2, int *ranks2);
|
||||
int MPI_Group_union(MPI_Group group1, MPI_Group group2,
|
||||
MPI_Group *newgroup);
|
||||
int MPI_Ibsend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
MPI_Fint MPI_Info_c2f(MPI_Info);
|
||||
int MPI_Info_create(MPI_Info *);
|
||||
int MPI_Info_delete(MPI_Info, char *);
|
||||
int MPI_Info_dup(MPI_Info, MPI_Info *);
|
||||
MPI_Info MPI_Info_f2c(MPI_Fint);
|
||||
int MPI_Info_free(MPI_Info *);
|
||||
int MPI_Info_get(MPI_Info, char *, int, char *, int *);
|
||||
int MPI_Info_get_nkeys(MPI_Info, int *);
|
||||
int MPI_Info_get_nthkey(MPI_Info, int, char *);
|
||||
int MPI_Info_get_valuelen(MPI_Info, char *, int *, int *);
|
||||
int MPI_Info_set(MPI_Info, char *, char *);
|
||||
int MPI_Init(int *, char ***);
|
||||
int MPI_Initialized(int *);
|
||||
int MPI_Init_thread(int *, char ***, int, int *);
|
||||
int MPI_Intercomm_create(MPI_Comm, int, MPI_Comm, int, int, MPI_Comm *);
|
||||
int MPI_Intercomm_merge(MPI_Comm, int, MPI_Comm *);
|
||||
int MPI_Iprobe(int, int, MPI_Comm, int *, MPI_Status *);
|
||||
int MPI_Irecv(void *, int, MPI_Datatype, int, int, MPI_Comm, MPI_Request *);
|
||||
int MPI_Irsend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
int MPI_Isend(void *, int, MPI_Datatype, int, int, MPI_Comm, MPI_Request *);
|
||||
int MPI_Issend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
int MPI_Is_thread_main(int *);
|
||||
int MPI_Keyval_create(MPI_Copy_function *, MPI_Delete_function *,
|
||||
int *, void *);
|
||||
int MPI_Keyval_free(int *);
|
||||
int MPI_Lookup_name(char *, MPI_Info, char *);
|
||||
int MPI_Ibsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
MPI_Fint MPI_Info_c2f(MPI_Info info);
|
||||
int MPI_Info_create(MPI_Info *info);
|
||||
int MPI_Info_delete(MPI_Info info, char *key);
|
||||
int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo);
|
||||
MPI_Info MPI_Info_f2c(MPI_Fint info);
|
||||
int MPI_Info_free(MPI_Info *info);
|
||||
int MPI_Info_get(MPI_Info info, char *key, int valuelen,
|
||||
char *value, int *flag);
|
||||
int MPI_Info_get_nkeys(MPI_Info info, int *nkeys);
|
||||
int MPI_Info_get_nthkey(MPI_Info info, int n, char *key);
|
||||
int MPI_Info_get_valuelen(MPI_Info info, char *key, int *valuelen,
|
||||
int *flag);
|
||||
int MPI_Info_set(MPI_Info info, char *key, char *value);
|
||||
int MPI_Init(int *argc, char ***argv);
|
||||
int MPI_Initialized(int *flag);
|
||||
int MPI_Init_thread(int *argc, char ***argv, int required,
|
||||
int *provided);
|
||||
int MPI_Intercomm_create(MPI_Comm local_comm, int local_leader,
|
||||
MPI_Comm bridge_comm, int remote_leader,
|
||||
int tag, MPI_Comm *newintercomm);
|
||||
int MPI_Intercomm_merge(MPI_Comm intercomm, int high,
|
||||
MPI_Comm *newintercomm);
|
||||
int MPI_Iprobe(int source, int tag, MPI_Comm comm, int *flag,
|
||||
MPI_Status *status);
|
||||
int MPI_Irecv(void *buf, int count, MPI_Datatype datatype, int source,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int MPI_Irsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int MPI_Isend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int MPI_Issend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int MPI_Is_thread_main(int *flag);
|
||||
int MPI_Keyval_create(MPI_Copy_function *copy_fn,
|
||||
MPI_Delete_function *delete_fn,
|
||||
int *keyval, void *extra_state);
|
||||
int MPI_Keyval_free(int *keyval);
|
||||
int MPI_Lookup_name(char *service_name, MPI_Info info, char *port_name);
|
||||
MPI_Fint MPI_Op_c2f(MPI_Op op);
|
||||
int MPI_Op_create(MPI_User_function *, int, MPI_Op *);
|
||||
int MPI_Open_port(MPI_Info, char *);
|
||||
@ -1090,36 +1100,46 @@ extern "C" {
|
||||
MPI_Group group2, int *ranks2);
|
||||
int PMPI_Group_union(MPI_Group group1, MPI_Group group2,
|
||||
MPI_Group *newgroup);
|
||||
int PMPI_Ibsend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
MPI_Fint PMPI_Info_c2f(MPI_Info);
|
||||
int PMPI_Info_create(MPI_Info *);
|
||||
int PMPI_Info_delete(MPI_Info, char *);
|
||||
int PMPI_Info_dup(MPI_Info, MPI_Info *);
|
||||
MPI_Info PMPI_Info_f2c(MPI_Fint);
|
||||
int PMPI_Info_free(MPI_Info *);
|
||||
int PMPI_Info_get(MPI_Info, char *, int, char *, int *);
|
||||
int PMPI_Info_get_nkeys(MPI_Info, int *);
|
||||
int PMPI_Info_get_nthkey(MPI_Info, int, char *);
|
||||
int PMPI_Info_get_valuelen(MPI_Info, char *, int *, int *);
|
||||
int PMPI_Info_set(MPI_Info, char *, char *);
|
||||
int PMPI_Init(int *, char ***);
|
||||
int PMPI_Initialized(int *);
|
||||
int PMPI_Init_thread(int *, char ***, int, int *);
|
||||
int PMPI_Intercomm_create(MPI_Comm, int, MPI_Comm, int, int, MPI_Comm *);
|
||||
int PMPI_Intercomm_merge(MPI_Comm, int, MPI_Comm *);
|
||||
int PMPI_Iprobe(int, int, MPI_Comm, int *, MPI_Status *);
|
||||
int PMPI_Irecv(void *, int, MPI_Datatype, int, int, MPI_Comm, MPI_Request *);
|
||||
int PMPI_Irsend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
int PMPI_Isend(void *, int, MPI_Datatype, int, int, MPI_Comm, MPI_Request *);
|
||||
int PMPI_Issend(void *, int, MPI_Datatype, int, int, MPI_Comm,
|
||||
MPI_Request *);
|
||||
int PMPI_Is_thread_main(int *);
|
||||
int PMPI_Keyval_create(MPI_Copy_function *, MPI_Delete_function *,
|
||||
int *, void *);
|
||||
int PMPI_Keyval_free(int *);
|
||||
int PMPI_Lookup_name(char *, MPI_Info, char *);
|
||||
int PMPI_Ibsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
MPI_Fint PMPI_Info_c2f(MPI_Info info);
|
||||
int PMPI_Info_create(MPI_Info *info);
|
||||
int PMPI_Info_delete(MPI_Info info, char *key);
|
||||
int PMPI_Info_dup(MPI_Info info, MPI_Info *newinfo);
|
||||
MPI_Info PMPI_Info_f2c(MPI_Fint info);
|
||||
int PMPI_Info_free(MPI_Info *info);
|
||||
int PMPI_Info_get(MPI_Info info, char *key, int valuelen,
|
||||
char *value, int *flag);
|
||||
int PMPI_Info_get_nkeys(MPI_Info info, int *nkeys);
|
||||
int PMPI_Info_get_nthkey(MPI_Info info, int n, char *key);
|
||||
int PMPI_Info_get_valuelen(MPI_Info info, char *key, int *valuelen,
|
||||
int *flag);
|
||||
int PMPI_Info_set(MPI_Info info, char *key, char *value);
|
||||
int PMPI_Init(int *argc, char ***argv);
|
||||
int PMPI_Initialized(int *flag);
|
||||
int PMPI_Init_thread(int *argc, char ***argv, int required,
|
||||
int *provided);
|
||||
int PMPI_Intercomm_create(MPI_Comm local_comm, int local_leader,
|
||||
MPI_Comm bridge_comm, int remote_leader,
|
||||
int tag, MPI_Comm *newintercomm);
|
||||
int PMPI_Intercomm_merge(MPI_Comm intercomm, int high,
|
||||
MPI_Comm *newintercomm);
|
||||
int PMPI_Iprobe(int source, int tag, MPI_Comm comm, int *flag,
|
||||
MPI_Status *status);
|
||||
int PMPI_Irecv(void *buf, int count, MPI_Datatype datatype, int source,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int PMPI_Irsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int PMPI_Isend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int PMPI_Issend(void *buf, int count, MPI_Datatype datatype, int dest,
|
||||
int tag, MPI_Comm comm, MPI_Request *request);
|
||||
int PMPI_Is_thread_main(int *flag);
|
||||
int PMPI_Keyval_create(MPI_Copy_function *copy_fn,
|
||||
MPI_Delete_function *delete_fn,
|
||||
int *keyval, void *extra_state);
|
||||
int PMPI_Keyval_free(int *keyval);
|
||||
int PMPI_Lookup_name(char *service_name, MPI_Info info, char *port_name);
|
||||
MPI_Fint PMPI_Op_c2f(MPI_Op op);
|
||||
int PMPI_Op_create(MPI_User_function *, int, MPI_Op *);
|
||||
int PMPI_Open_port(MPI_Info, char *);
|
||||
|
||||
18
src/mpi/interface/c/keyval_create.c
Обычный файл
18
src/mpi/interface/c/keyval_create.c
Обычный файл
@ -0,0 +1,18 @@
|
||||
/*
|
||||
* $HEADER$
|
||||
*/
|
||||
|
||||
#include "lam_config.h"
|
||||
|
||||
#include "mpi.h"
|
||||
#include "mpi/interface/c/bindings.h"
|
||||
|
||||
#if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
|
||||
#pragma weak MPI_Keyval_create = PMPI_Keyval_create
|
||||
#endif
|
||||
|
||||
int MPI_Keyval_create(MPI_Copy_function *copy_fn,
|
||||
MPI_Delete_function *delete_fn,
|
||||
int *keyval, void *extra_state) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
16
src/mpi/interface/c/keyval_free.c
Обычный файл
16
src/mpi/interface/c/keyval_free.c
Обычный файл
@ -0,0 +1,16 @@
|
||||
/*
|
||||
* $HEADER$
|
||||
*/
|
||||
|
||||
#include "lam_config.h"
|
||||
|
||||
#include "mpi.h"
|
||||
#include "mpi/interface/c/bindings.h"
|
||||
|
||||
#if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
|
||||
#pragma weak MPI_Keyval_free = PMPI_Keyval_free
|
||||
#endif
|
||||
|
||||
int MPI_Keyval_free(int *keyval) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
16
src/mpi/interface/c/lookup_name.c
Обычный файл
16
src/mpi/interface/c/lookup_name.c
Обычный файл
@ -0,0 +1,16 @@
|
||||
/*
|
||||
* $HEADER$
|
||||
*/
|
||||
|
||||
#include "lam_config.h"
|
||||
|
||||
#include "mpi.h"
|
||||
#include "mpi/interface/c/bindings.h"
|
||||
|
||||
#if LAM_HAVE_WEAK_SYMBOLS && LAM_PROFILING_DEFINES
|
||||
#pragma weak MPI_Lookup_name = PMPI_Lookup_name
|
||||
#endif
|
||||
|
||||
int MPI_Lookup_name(char *service_name, MPI_Info info, char *port_name) {
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
Загрузка…
x
Ссылка в новой задаче
Block a user