MPI_Get_count() はカウントに対して負の値を返すことができますか? メッセージのサイズが 1138 整数を超えることはありません。したがって、メッセージの長さの問題にはなりません。
if(MPI_Probe(MPI_ANY_SOURCE,0,MPI_COMM_WORLD,&status) == MPI_SUCCESS)
{
printf("probe flag true\n");
MPI_Get_count(&status,MPI_DOUBLE,&recv_size);
}
取得した recv_size の値は負です。