/* * Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana * University Research and Technology * Corporation. All rights reserved. * Copyright (c) 2004-2005 The University of Tennessee and The University * of Tennessee Research Foundation. All rights * reserved. * Copyright (c) 2004-2005 High Performance Computing Center Stuttgart, * University of Stuttgart. All rights reserved. * Copyright (c) 2004-2005 The Regents of the University of California. * All rights reserved. * $COPYRIGHT$ * * Additional copyrights may follow * * $HEADER$ */ #include "ompi_config.h" #ifdef HAVE_SYS_TIME_H #include #endif #include #include MCA_timer_IMPLEMENTATION_HEADER #include "ompi/mpi/c/bindings.h" #include "ompi/runtime/mpiruntime.h" #if OMPI_HAVE_WEAK_SYMBOLS && OMPI_PROFILING_DEFINES #pragma weak MPI_Wtick = PMPI_Wtick #endif #if OMPI_PROFILING_DEFINES #include "ompi/mpi/c/profile/defines.h" #endif static const char FUNC_NAME[] = "MPI_Wtick"; double MPI_Wtick(void) { #if OPAL_TIMER_USEC_NATIVE return 0.000001; #else #if defined(__WINDOWS__) if( (opal_timer_t)0 == opal_timer_base_get_freq() ) { opal_output( 0, "No timer frequency\n" ); } return (double)opal_timer_base_get_freq(); #else return 0.000001; #endif /* defined(__WINDOWS__) */ #endif /* OPAL_TIMER_USEC_NATIVE */ }