1
1

- Update for new global function name (lam_group_allocate)

- Silence some minor compiler warnings

This commit was SVN r933.
Этот коммит содержится в:
Jeff Squyres 2004-03-19 06:11:48 +00:00
родитель b9b207888e
Коммит 5e67eb96c8
7 изменённых файлов: 9 добавлений и 9 удалений

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

@ -58,7 +58,7 @@ int MPI_Group_difference(MPI_Group group1, MPI_Group group2,
} /* end proc loop */
/* allocate a new lam_group_t structure */
new_group_pointer=group_allocate(new_group_size);
new_group_pointer=lam_group_allocate(new_group_size);
if( NULL == new_group_pointer ) {
return MPI_ERR_GROUP;
}

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

@ -41,7 +41,7 @@ int MPI_Group_excl(MPI_Group group, int n, int *ranks,
*/
/* get new group struct */
new_group_pointer=group_allocate(group_pointer->grp_proc_count-n);
new_group_pointer=lam_group_allocate(group_pointer->grp_proc_count-n);
if( NULL == new_group_pointer ) {
return MPI_ERR_GROUP;
}

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

@ -38,7 +38,7 @@ int MPI_Group_incl(MPI_Group group, int n, int *ranks, MPI_Group *new_group)
/* get new group struct */
new_group_pointer=group_allocate(n);
new_group_pointer=lam_group_allocate(n);
if( NULL == new_group_pointer ) {
return MPI_ERR_GROUP;
}

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

@ -17,7 +17,7 @@ int MPI_Group_intersection(MPI_Group group1, MPI_Group group2,
/* local variables */
int return_value,my_group_rank;
int group_size,proc,proc1,proc2,cnt;
int group_size,proc1,proc2,cnt;
lam_group_t *group1_pointer, *group2_pointer, *new_group_pointer;
lam_proc_t *proc1_pointer, *proc2_pointer, *my_proc_pointer;
@ -53,7 +53,7 @@ int MPI_Group_intersection(MPI_Group group1, MPI_Group group2,
} /* end proc1 loop */
/* fill in new group */
new_group_pointer=group_allocate(group_size);
new_group_pointer=lam_group_allocate(group_size);
if( NULL == new_group_pointer ) {
return MPI_ERR_GROUP;
}

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

@ -123,7 +123,7 @@ int MPI_Group_range_excl(MPI_Group group, int n_triplets, int ranges[][3],
new_group_size=group_pointer->grp_proc_count-new_group_size;
/* allocate a new lam_group_t structure */
new_group_pointer=group_allocate(new_group_size);
new_group_pointer=lam_group_allocate(new_group_size);
if( NULL == new_group_pointer ) {
free(elements_int_list);
return MPI_ERR_GROUP;

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

@ -114,7 +114,7 @@ int MPI_Group_range_incl(MPI_Group group, int n_triplets, int ranges[][3],
}
/* allocate a new lam_group_t structure */
new_group_pointer=group_allocate(new_group_size);
new_group_pointer=lam_group_allocate(new_group_size);
if( NULL == new_group_pointer ) {
free(elements_int_list);
return MPI_ERR_GROUP;

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

@ -15,7 +15,7 @@
int MPI_Group_union(MPI_Group group1, MPI_Group group2, MPI_Group *new_group)
{
/* local variables */
int return_value, new_group_size, proc, proc1, proc2, found_in_group;
int return_value, new_group_size, proc1, proc2, found_in_group;
int my_group_rank, cnt;
lam_group_t *group1_pointer, *group2_pointer, *new_group_pointer;
lam_proc_t *proc1_pointer, *proc2_pointer, *my_proc_pointer;
@ -60,7 +60,7 @@ int MPI_Group_union(MPI_Group group1, MPI_Group group2, MPI_Group *new_group)
} /* end proc loop */
/* get new group struct */
new_group_pointer = group_allocate(new_group_size);
new_group_pointer = lam_group_allocate(new_group_size);
if (NULL == new_group_pointer) {
return MPI_ERR_GROUP;
}