1
1
This commit was SVN r5414.
Этот коммит содержится в:
Jeff Squyres 2005-04-18 14:21:29 +00:00
родитель 9e4dadafdd
Коммит 6fbf9c29f2
2 изменённых файлов: 4 добавлений и 4 удалений

Просмотреть файл

@ -272,7 +272,7 @@ void mpi_dup_fn_f( MPI_Fint* comm, MPI_Fint* comm_keyval,
}
#if OMPI_WANT_MPI2_ONE_SIDED
void mpi_win_null_delete_fn_f( MPI_FMPI_Fint* window, MPI_Fint* win_keyval,
void mpi_win_null_delete_fn_f( MPI_Fint* window, MPI_Fint* win_keyval,
MPI_Fint* attribute_val_out,
MPI_Fint* extra_state, MPI_Fint* ierr )
{

Просмотреть файл

@ -30,7 +30,7 @@ OMPI_GENERATE_F77_BINDINGS (PMPI_WIN_CREATE_KEYVAL,
pmpi_win_create_keyval_,
pmpi_win_create_keyval__,
pmpi_win_create_keyval_f,
(MPI_F_copy_function* win_copy_attr_fn, MPI_F_delete_function* win_delete_attr_fn, MPI_Fint *win_keyval, char *extra_state, MPI_Fint *ierr),
(MPI_F_copy_function* win_copy_attr_fn, MPI_F_delete_function* win_delete_attr_fn, MPI_Fint *win_keyval, MPI_Fint *extra_state, MPI_Fint *ierr),
(win_copy_attr_fn, win_delete_attr_fn, win_keyval, extra_state, ierr) )
#endif
@ -47,7 +47,7 @@ OMPI_GENERATE_F77_BINDINGS (MPI_WIN_CREATE_KEYVAL,
mpi_win_create_keyval_,
mpi_win_create_keyval__,
mpi_win_create_keyval_f,
(MPI_F_copy_function* win_copy_attr_fn, MPI_F_delete_function* win_delete_attr_fn, MPI_Fint *win_keyval, char *extra_state, MPI_Fint *ierr),
(MPI_F_copy_function* win_copy_attr_fn, MPI_F_delete_function* win_delete_attr_fn, MPI_Fint *win_keyval, MPI_Fint *extra_state, MPI_Fint *ierr),
(win_copy_attr_fn, win_delete_attr_fn, win_keyval, extra_state, ierr) )
#endif
@ -60,7 +60,7 @@ static char FUNC_NAME[] = "MPI_Win_create_keyval";
void mpi_win_create_keyval_f(MPI_F_copy_function* win_copy_attr_fn,
MPI_F_delete_function* win_delete_attr_fn,
MPI_Fint *win_keyval, char *extra_state, MPI_Fint *ierr)
MPI_Fint *win_keyval, MPI_Fint *extra_state, MPI_Fint *ierr)
{
int ret, c_err;
ompi_attribute_fn_ptr_union_t copy_fn;