Commit 6814cb86 authored by Pavan Balaji's avatar Pavan Balaji
Browse files

Bug fix for MPI_WEIGHTS_EMPTY.



When freeing arrays, we were not checking for the case where the array
might be set to MPI_WEIGHTS_EMPTY.
Signed-off-by: default avatarWilliam Gropp <wgropp@illinois.edu>
parent 66865358
......@@ -1841,7 +1841,7 @@ sub unweighted_in_ftoc {
for (li=0; li<$Array_size; li++) l$count\[li\] = (int)v$count\[li\];
}
EOT
$clean_up .= " if (l$count != MPI_UNWEIGHTED) {$free(l$count);}\n";
$clean_up .= " if (l$count != MPI_UNWEIGHTED && l$count != MPI_WEIGHTS_EMPTY) {$free(l$count);}\n";
}
else {
print $OUTFD " if (v$count == MPIR_F_MPI_UNWEIGHTED) v$count = MPI_UNWEIGHTED;\n";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment