* fix prototypes for the strange COPY, DUP, DELETE functions - last argument
should be void* not int* This commit was SVN r1654.
Этот коммит содержится в:
Brian Barrett
родитель
88af9e2f2c
Коммит
d71d949620
@ -285,29 +285,29 @@ enum {
|
||||
#define MPI_STATUSES_IGNORE ((MPI_Status *) 0)
|
||||
|
||||
int MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype, int type_keyval,
|
||||
void* attribute_val_out, int* flag );
|
||||
void* attribute_val_out, void* flag );
|
||||
int MPI_TYPE_NULL_COPY_FN( MPI_Datatype datatype, int type_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_TYPE_DUP_FN( MPI_Datatype datatype, int type_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_COMM_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
|
||||
void* attribute_val_out, int* flag );
|
||||
void* attribute_val_out, void* flag );
|
||||
int MPI_COMM_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_COMM_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
|
||||
void* attribute_val_out, int* flag );
|
||||
void* attribute_val_out, void* flag );
|
||||
int MPI_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_WIN_NULL_DELETE_FN( MPI_Win window, int win_keyval,
|
||||
void* attribute_val_out, int* flag );
|
||||
void* attribute_val_out, void* flag );
|
||||
int MPI_WIN_NULL_COPY_FN( MPI_Win window, int win_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
int MPI_WIN_DUP_FN( MPI_Win window, int win_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out, int* flag );
|
||||
void* attribute_val_in, void* attribute_val_out, void* flag );
|
||||
|
||||
/*
|
||||
* External variables
|
||||
|
||||
@ -12,7 +12,7 @@
|
||||
|
||||
int MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype, int type_keyval,
|
||||
void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
/* Why not all MPI functions are like this ?? */
|
||||
return MPI_SUCCESS;
|
||||
@ -20,89 +20,89 @@ int MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype, int type_keyval,
|
||||
|
||||
int MPI_TYPE_NULL_COPY_FN( MPI_Datatype datatype, int type_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag= 0;
|
||||
*(int*) flag = 0;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_TYPE_DUP_FN( MPI_Datatype datatype, int type_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag = 1;
|
||||
*(int*) flag = 1;
|
||||
*(void**)attribute_val_out = attribute_val_in;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_WIN_NULL_DELETE_FN( MPI_Win window, int win_keyval,
|
||||
void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_WIN_NULL_COPY_FN( MPI_Win window, int win_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag= 0;
|
||||
*(int*) flag= 0;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_WIN_DUP_FN( MPI_Win window, int win_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag = 1;
|
||||
*(int*) flag = 1;
|
||||
*(void**)attribute_val_out = attribute_val_in;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_COMM_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
|
||||
void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_COMM_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag= 0;
|
||||
*(int*) flag= 0;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_COMM_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag = 1;
|
||||
*(int*) flag = 1;
|
||||
*(void**)attribute_val_out = attribute_val_in;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
|
||||
void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_NULL_COPY_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag= 0;
|
||||
*(int*) flag= 0;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
int MPI_DUP_FN( MPI_Comm comm, int comm_keyval, void* extra_state,
|
||||
void* attribute_val_in, void* attribute_val_out,
|
||||
int* flag )
|
||||
void* flag )
|
||||
{
|
||||
*flag = 1;
|
||||
*(int*) flag = 1;
|
||||
*(void**)attribute_val_out = attribute_val_in;
|
||||
return MPI_SUCCESS;
|
||||
}
|
||||
|
||||
Загрузка…
x
Ссылка в новой задаче
Block a user