Ignore:
Timestamp:
12/04/17 17:12:00 (4 years ago)
Author:
yushan
Message:

omp dev : unify MPI_Comm type

File:
1 edited

Legend:

Unmodified
Added
Removed
  • XIOS/dev/branch_openmp/extern/src_ep_dev/ep_split.cpp

    r1338 r1354  
    22#include <mpi.h> 
    33#include "ep_declaration.hpp" 
     4#include "ep_mpi.hpp" 
    45 
    56using namespace std; 
     
    134135    } 
    135136 
    136     ::MPI_Comm split_mpi_comm[num_color]; 
     137    ::MPI_Comm **split_mpi_comm; 
     138    split_mpi_comm = new ::MPI_Comm* [num_color]; 
     139    for(int ii=0; ii<num_color; ii++) 
     140      split_mpi_comm[ii] = new ::MPI_Comm; 
    137141 
    138142    for(int j=0; j<num_color; j++) 
     
    143147        if(matched_number_loc[j] == 0) master_color = MPI_UNDEFINED; 
    144148 
    145         ::MPI_Comm_split(static_cast< ::MPI_Comm>(comm.mpi_comm), master_color, mpi_rank, &split_mpi_comm[j]); 
     149        ::MPI_Comm_split(to_mpi_comm(comm.mpi_comm), master_color, mpi_rank, split_mpi_comm[j]); 
    146150         
    147151        comm.ep_comm_ptr->comm_list->mpi_bridge = split_mpi_comm[j]; 
Note: See TracChangeset for help on using the changeset viewer.