comm);
/* wait for and forward current segment */
smpi_mpi_waitall( 1, &base_req, MPI_STATUSES_IGNORE );
for( i = 0; i < tree->tree_nextsize; i++ ) { /* send data to children (segcount[lr]) */
smpi_mpi_send( tmpbuf[lr], segcount[lr], datatype,
comm);
/* wait for and forward current segment */
smpi_mpi_waitall( 1, &base_req, MPI_STATUSES_IGNORE );
for( i = 0; i < tree->tree_nextsize; i++ ) { /* send data to children (segcount[lr]) */
smpi_mpi_send( tmpbuf[lr], segcount[lr], datatype,