Changeset 359


Ignore:
Timestamp:
09/11/12 14:44:29 (8 years ago)
Author:
ymipsl
Message:

Bug correction : using MPI_WTIME MPI function for tracing before MPI_Init is called.

YM

Location:
XIOS/trunk/src
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • XIOS/trunk/src/client.cpp

    r347 r359  
    3838            MPI_Init(&argc,&argv) ; 
    3939          } 
     40          CTimer::get("XIOS").resume() ; 
     41          CTimer::get("XIOS init").resume() ; 
    4042          boost::hash<string> hashString ;     
    4143     
     
    108110        } 
    109111        else MPI_Comm_dup(localComm,&intraComm) ; 
     112        CTimer::get("XIOS").resume() ; 
     113        CTimer::get("XIOS init").resume() ; 
    110114   
    111115        if (CXios::usingServer)  
     
    124128           
    125129      MPI_Comm_dup(intraComm,&returnComm) ; 
     130      CTimer::get("XIOS init").suspend() ; 
     131      CTimer::get("XIOS").suspend() ; 
    126132    } 
    127133     
  • XIOS/trunk/src/interface/c/icdata.cpp

    r352 r359  
    3737   void cxios_init_server(void) 
    3838   { 
    39      CTimer::get("XIOS").resume() ; 
    4039     CXios::initServerSide();       
    41      CTimer::get("XIOS").suspend() ; 
    4240   } 
    4341 
     
    5048      if (!cstr2string(client_id, len_client_id, str)) return; 
    5149 
    52       CTimer::get("XIOS").resume() ; 
    53       CTimer::get("XIOS init").resume() ; 
    5450      int initialized ; 
    5551      MPI_Initialized(&initialized) ; 
     
    5854      CXios::initClientSide(str,local_comm,return_comm); 
    5955      *f_return_comm=MPI_Comm_c2f(return_comm) ; 
    60       CTimer::get("XIOS init").suspend() ; 
    61       CTimer::get("XIOS").suspend() ; 
    6256   } 
    6357 
  • XIOS/trunk/src/server.cpp

    r352 r359  
    3939          MPI_Init(&argc,&argv) ; 
    4040        } 
    41           
     41        CTimer::get("XIOS").resume() ; 
     42  
    4243        boost::hash<string> hashString ;     
    4344       
     
    9697        int rank ,size; 
    9798        if (!is_MPI_Initialized) oasis_init(CXios::xiosCodeId) ; 
     99        CTimer::get("XIOS").resume() ; 
    98100        oasis_get_localcomm(intraComm) ; 
    99101        MPI_Comm_rank(intraComm,&rank) ; 
     
    124126      eventLoop() ; 
    125127      finalize() ; 
     128      CTimer::get("XIOS").suspend() ; 
    126129    } 
    127130     
Note: See TracChangeset for help on using the changeset viewer.