
was that declaring the type of MPI_WTICK and MPI_TIME in mpif-common.h would allow the F90 bindings to call through to the back end f77 function and have the right return type. But upon reflection, that's silly -- we were just declaring the variables MPI_WTICK and MPI_WTIME that were of type double precision. Duh. So add some fixed (non-generated) wrapper F90 functions to call the back-end *C* MPI_WTICK and MPI_TIME functions (vs. the back end *F77* functions). We have to call the back-end C functions because there's a name conflict if we try to call the back-end F77 functions -- for the same reasons that we can't "implicitly" define MPI_WTIME and MPI_WTICK in the f90 module, we can't call such an implicitly-defined function. So we had to add new back-end C functions that are directly callable from Fortran, the easiest implementation of which was to provide 4 one-line functions for each (rather than muck around with weak symbols). This commit was SVN r10448.
/* * 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$ */ /** @page page_mpi The src/mpi directory @section page_mpi_introduction Introduction This is the introduction. This is the introduction. This is the introduction. This is the introduction. This is the introduction. This is the introduction. This is the introduction. */