Changeset 1287 for XIOS/dev/branch_openmp/extern/src_ep_dev/ep_create.cpp
- Timestamp:
- 10/04/17 11:45:14 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_openmp/extern/src_ep_dev/ep_create.cpp
r1134 r1287 52 52 } 53 53 54 ::MPI_Allgather(&num_ep, 1, MPI_INT _STD, &recv_num_ep[0], 1, MPI_INT_STD, mpi_base_comm);54 ::MPI_Allgather(&num_ep, 1, MPI_INT, &recv_num_ep[0], 1, MPI_INT, mpi_base_comm); 55 55 56 56 … … 63 63 64 64 out_comm_hdls[0].my_buffer = new BUFFER; 65 out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE];66 out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE];67 out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE];68 out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE];69 out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE];70 out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE];65 // out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE]; 66 // out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE]; 67 // out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE]; 68 // out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE]; 69 // out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE]; 70 // out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE]; 71 71 72 72 out_comm_hdls[0].rank_map = new RANK_MAP; … … 135 135 } 136 136 137 ::MPI_Allgather(&num_ep, 1, MPI_INT _STD, &recv_num_ep[0], 1, MPI_INT_STD, mpi_base_comm);137 ::MPI_Allgather(&num_ep, 1, MPI_INT, &recv_num_ep[0], 1, MPI_INT, mpi_base_comm); 138 138 139 139 int sum = 0; // representing total ep number of process with smaller rank … … 145 145 146 146 out_comm_hdls[0].my_buffer = new BUFFER; 147 out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE];148 out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE];149 out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE];150 out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE];151 out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE];152 out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE];147 // out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE]; 148 // out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE]; 149 // out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE]; 150 // out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE]; 151 // out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE]; 152 // out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE]; 153 153 154 154 out_comm_hdls[0].rank_map = new RANK_MAP; … … 222 222 } 223 223 224 ::MPI_Allgather(&num_ep, 1, MPI_INT _STD, &recv_num_ep[0], 1, MPI_INT_STD, mpi_base_comm);224 ::MPI_Allgather(&num_ep, 1, MPI_INT, &recv_num_ep[0], 1, MPI_INT, mpi_base_comm); 225 225 226 226 … … 233 233 234 234 out_comm_hdls[0].my_buffer = new BUFFER; 235 out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE];236 out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE];237 out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE];238 out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE];239 out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE];240 out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE];235 // out_comm_hdls[0].my_buffer->buf_double = new double[BUFFER_SIZE]; 236 // out_comm_hdls[0].my_buffer->buf_float = new float[BUFFER_SIZE]; 237 // out_comm_hdls[0].my_buffer->buf_int = new int[BUFFER_SIZE]; 238 // out_comm_hdls[0].my_buffer->buf_long = new long[BUFFER_SIZE]; 239 // out_comm_hdls[0].my_buffer->buf_ulong = new unsigned long[BUFFER_SIZE]; 240 // out_comm_hdls[0].my_buffer->buf_char = new char[BUFFER_SIZE]; 241 241 242 242 out_comm_hdls[0].rank_map = new RANK_MAP;
Note: See TracChangeset
for help on using the changeset viewer.