int recv_size = parse_double(action[3]);
MPI_Datatype MPI_CURRENT_TYPE2;
- if(action[4]) {
+ if(action[4] && action[5]) {
MPI_CURRENT_TYPE=decode_datatype(action[4]);
+ MPI_CURRENT_TYPE2=decode_datatype(action[5]);
}
else{
MPI_CURRENT_TYPE=MPI_DEFAULT_TYPE;
- }
-
- if (action[5]){
- MPI_CURRENT_TYPE2=decode_datatype(action[5]);
- }
- else {
MPI_CURRENT_TYPE2=MPI_DEFAULT_TYPE;
}
+
void *send = smpi_get_tmp_sendbuffer(send_size*comm_size* smpi_datatype_size(MPI_CURRENT_TYPE));
void *recv = smpi_get_tmp_recvbuffer(recv_size*comm_size* smpi_datatype_size(MPI_CURRENT_TYPE2));
int i=0,recv_sum=0;
MPI_Datatype MPI_CURRENT_TYPE2;
- if(action[4+comm_size]) {
+ if(action[4+comm_size] && action[5+comm_size]) {
MPI_CURRENT_TYPE=decode_datatype(action[4+comm_size]);
MPI_CURRENT_TYPE2=decode_datatype(action[5+comm_size]);
} else {
MPI_Datatype MPI_CURRENT_TYPE2;
- if(action[4]) {
- MPI_CURRENT_TYPE = decode_datatype(action[3]);
- MPI_CURRENT_TYPE2 = decode_datatype(action[4]);
+ if(action[4] && action[5]) {
+ MPI_CURRENT_TYPE = decode_datatype(action[4]);
+ MPI_CURRENT_TYPE2 = decode_datatype(action[5]);
} else {
MPI_CURRENT_TYPE = MPI_DEFAULT_TYPE;
MPI_CURRENT_TYPE2 = MPI_DEFAULT_TYPE;
int recv_sum=0;
MPI_Datatype MPI_CURRENT_TYPE2;
- if(action[3+comm_size]) {
+ if(action[3+comm_size] && action[4+comm_size]) {
MPI_CURRENT_TYPE = decode_datatype(action[3+comm_size]);
MPI_CURRENT_TYPE2 = decode_datatype(action[4+comm_size]);
} else {