Ignore:
Timestamp:
05/28/18 09:54:32 (6 years ago)
Author:
yushan
Message:

save dev

File:
1 edited

Legend:

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

    r1381 r1500  
    3939    int ep_size, num_ep, mpi_size; 
    4040 
    41     ep_rank = comm.ep_comm_ptr->size_rank_info[0].first; 
    42     ep_rank_loc = comm.ep_comm_ptr->size_rank_info[1].first; 
    43     mpi_rank = comm.ep_comm_ptr->size_rank_info[2].first; 
    44     ep_size = comm.ep_comm_ptr->size_rank_info[0].second; 
    45     num_ep = comm.ep_comm_ptr->size_rank_info[1].second; 
    46     mpi_size = comm.ep_comm_ptr->size_rank_info[2].second; 
     41    ep_rank = comm->ep_comm_ptr->size_rank_info[0].first; 
     42    ep_rank_loc = comm->ep_comm_ptr->size_rank_info[1].first; 
     43    mpi_rank = comm->ep_comm_ptr->size_rank_info[2].first; 
     44    ep_size = comm->ep_comm_ptr->size_rank_info[0].second; 
     45    num_ep = comm->ep_comm_ptr->size_rank_info[1].second; 
     46    mpi_size = comm->ep_comm_ptr->size_rank_info[2].second; 
    4747 
    4848    int num_color = 0; 
     
    147147        if(matched_number_loc[j] == 0) master_color = MPI_UNDEFINED; 
    148148 
    149         ::MPI_Comm_split(to_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]); 
    150150         
    151         comm.ep_comm_ptr->comm_list->mpi_bridge = split_mpi_comm[j]; 
     151        comm->ep_comm_ptr->comm_list[0]->mpi_bridge = split_mpi_comm[j]; 
    152152      } 
    153153      MPI_Barrier_local(comm); 
     
    160160        MPI_Comm *ep_comm; 
    161161 
    162         MPI_Comm_create_endpoints(comm.ep_comm_ptr->comm_list->mpi_bridge, num_new_ep, info, ep_comm); 
     162        MPI_Comm_create_endpoints(comm->ep_comm_ptr->comm_list[0]->mpi_bridge, num_new_ep, info, ep_comm); 
    163163 
    164164 
    165         comm.ep_comm_ptr->comm_list->mem_bridge = ep_comm; 
     165        comm->ep_comm_ptr->comm_list[0]->mem_bridge = ep_comm; 
    166166      } 
    167167      MPI_Barrier_local(comm); 
    168168      if(color == all_color[j]) 
    169169      { 
    170         *newcomm = comm.ep_comm_ptr->comm_list->mem_bridge[new_ep_rank_loc]; 
     170        *newcomm = comm->ep_comm_ptr->comm_list[0]->mem_bridge[new_ep_rank_loc]; 
    171171 
    172         (*newcomm).ep_comm_ptr->comm_label = color; 
     172        (*newcomm)->ep_comm_ptr->comm_label = color; 
    173173      } 
    174174    } 
Note: See TracChangeset for help on using the changeset viewer.