1
1

removing one last typo from group_compare, re-added a check in group_translate_ranks, which I deleted accidentally

This commit was SVN r1259.
Этот коммит содержится в:
Edgar Gabriel 2004-06-15 00:25:36 +00:00
родитель df91640da6
Коммит 1a2998bdab
2 изменённых файлов: 2 добавлений и 2 удалений

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

@ -70,7 +70,7 @@ int MPI_Group_compare(MPI_Group group1, MPI_Group group2, int *result) {
/* loop over group2 processes to find "match" */
match=-1;
for(proc2=0 ; proc2 < group2_pointer->grp_proc_count ; proc2++ ) {
proc2_pointer=group1_pointer->grp_proc_pointers[proc2];
proc2_pointer=group2_pointer->grp_proc_pointers[proc2];
if( proc1_pointer == proc2_pointer ) {
if(proc1 != proc2 ) {
identical=0;

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

@ -35,7 +35,7 @@ int MPI_Group_translate_ranks(MPI_Group group1, int n_ranks, int *ranks1,
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_GROUP,
"MPI_Group_translate_ranks");
}
if( 0 >= n_ranks ){
if( (n_ranks > group1_pointer->grp_proc_count) || (0 >= n_ranks) ){
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_GROUP,
"MPI_Group_translate_ranks - II ");
}