Oops -- these should actually be size_t, not int.
This commit was SVN r950.
Этот коммит содержится в:
родитель
cfe2bd2427
Коммит
765fd3f4f8
@ -16,7 +16,7 @@
|
|||||||
|
|
||||||
MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler_f)
|
MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler_f)
|
||||||
{
|
{
|
||||||
int eh_index = (int) errhandler_f;
|
size_t eh_index = (size_t) errhandler_f;
|
||||||
|
|
||||||
/* Error checking */
|
/* Error checking */
|
||||||
|
|
||||||
|
@ -16,9 +16,9 @@ MPI_Group MPI_Group_f2c(MPI_Fint group_f)
|
|||||||
{
|
{
|
||||||
/* local variables */
|
/* local variables */
|
||||||
lam_group_t *group_c;
|
lam_group_t *group_c;
|
||||||
int group_index;
|
size_t group_index;
|
||||||
|
|
||||||
group_index = (int) group_f;
|
group_index = (size_t) group_f;
|
||||||
|
|
||||||
/* error checks */
|
/* error checks */
|
||||||
if (MPI_PARAM_CHECK) {
|
if (MPI_PARAM_CHECK) {
|
||||||
|
Загрузка…
Ссылка в новой задаче
Block a user