Changeset 2467 for XIOS3/branches
- Timestamp:
- 03/07/23 10:03:36 (16 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS3/branches/xios-3.0-beta/src/interface/c/icdata.cpp
r2427 r2467 66 66 if (!cstr2string(client_id, len_client_id, str)) return; 67 67 68 CTimer::get("XIOS").resume();69 CTimer::get("XIOS init").resume();70 68 int initialized; 71 69 MPI_Initialized(&initialized); 72 if (initialized) local_comm=MPI_Comm_f2c(*f_local_comm); 70 if (initialized) 71 { 72 CTimer::get("XIOS").resume(); 73 CTimer::get("XIOS init").resume(); 74 local_comm=MPI_Comm_f2c(*f_local_comm); 75 } 73 76 else local_comm=MPI_COMM_NULL; 74 77 CXios::initClientSide(str, local_comm, return_comm); 75 78 *f_return_comm=MPI_Comm_c2f(return_comm); 76 CTimer::get("XIOS init").suspend(); 77 CTimer::get("XIOS").suspend(); 79 if (initialized) 80 { 81 CTimer::get("XIOS init").suspend(); 82 CTimer::get("XIOS").suspend(); 83 } 78 84 } 79 85 CATCH_DUMP_STACK
Note: See TracChangeset
for help on using the changeset viewer.