1
1

Adding new functions: Letter I

This commit was SVN r540.
Этот коммит содержится в:
Prabhanjan Kambadur 2004-01-25 22:07:54 +00:00
родитель fed1964471
Коммит 2ced423d3e
22 изменённых файлов: 364 добавлений и 0 удалений

17
src/mpi/interface/c/ibsend.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Ibsend = PMPI_Ibsend
#endif
int MPI_Ibsend(void *buf, int count, MPI_Datatype datatype, int dest,
int tag, MPI_Comm comm, MPI_Request *request) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_c2f.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_Info_c2f = PMPI_Info_c2f
#endif
MPI_Fint MPI_Info_c2f(MPI_Info info) {
return (MPI_Fint)0;
}

16
src/mpi/interface/c/info_create.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_Info_create = PMPI_Info_create
#endif
int MPI_Info_create(MPI_Info *info) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_delete.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_Info_delete = PMPI_Info_delete
#endif
int MPI_Info_delete(MPI_Info info, char *key) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_dup.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_Info_dup = PMPI_Info_dup
#endif
int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_f2c.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_Info_f2c = PMPI_Info_f2c
#endif
MPI_Info MPI_Info_f2c(MPI_Fint info) {
return (MPI_Info)0;
}

16
src/mpi/interface/c/info_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_Info_free = PMPI_Info_free
#endif
int MPI_Info_free(MPI_Info *info) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/info_get.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Info_get = PMPI_Info_get
#endif
int MPI_Info_get(MPI_Info info, char *key, int valuelen,
char *value, int *flag) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_get_nkeys.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_Info_get_nkeys = PMPI_Info_get_nkeys
#endif
int MPI_Info_get_nkeys(MPI_Info info, int *nkeys) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_get_nthkey.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_Info_get_nthkey = PMPI_Info_get_nthkey
#endif
int MPI_Info_get_nthkey(MPI_Info info, int n, char *key) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/info_get_valuelen.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Info_get_valuelen = PMPI_Info_get_valuelen
#endif
int MPI_Info_get_valuelen(MPI_Info info, char *key, int *valuelen,
int *flag) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/info_set.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_Info_set = PMPI_Info_set
#endif
int MPI_Info_set(MPI_Info info, char *key, char *value) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/init_thread.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Init_thread = PMPI_Init_thread
#endif
int MPI_Init_thread(int *argc, char ***argv, int required,
int *provided) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/initialized.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_Initialized = PMPI_Initialized
#endif
int MPI_Initialized(int *flag) {
return MPI_SUCCESS;
}

18
src/mpi/interface/c/intercomm_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_Intercomm_create = PMPI_Intercomm_create
#endif
int MPI_Intercomm_create(MPI_Comm local_comm, int local_leader,
MPI_Comm bridge_comm, int remote_leader,
int tag, MPI_Comm *newintercomm) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/intercomm_merge.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Intercomm_merge = PMPI_Intercomm_merge
#endif
int MPI_Intercomm_merge(MPI_Comm intercomm, int high,
MPI_Comm *newintercomm) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/iprobe.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Iprobe = PMPI_Iprobe
#endif
int MPI_Iprobe(int source, int tag, MPI_Comm comm, int *flag,
MPI_Status *status) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/irecv.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Irecv = PMPI_Irecv
#endif
int MPI_Irecv(void *buf, int count, MPI_Datatype datatype, int source,
int tag, MPI_Comm comm, MPI_Request *request) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/irsend.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Irsend = PMPI_Irsend
#endif
int MPI_Irsend(void *buf, int count, MPI_Datatype datatype, int dest,
int tag, MPI_Comm comm, MPI_Request *request) {
return MPI_SUCCESS;
}

16
src/mpi/interface/c/is_thread_main.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_Is_thread_main = PMPI_Is_thread_main
#endif
int MPI_Is_thread_main(int *flag) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/isend.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Isend = PMPI_Isend
#endif
int MPI_Isend(void *buf, int count, MPI_Datatype datatype, int dest,
int tag, MPI_Comm comm, MPI_Request *request) {
return MPI_SUCCESS;
}

17
src/mpi/interface/c/issend.c Обычный файл
Просмотреть файл

@ -0,0 +1,17 @@
/*
* $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_Issend = PMPI_Issend
#endif
int MPI_Issend(void *buf, int count, MPI_Datatype datatype, int dest,
int tag, MPI_Comm comm, MPI_Request *request) {
return MPI_SUCCESS;
}