Commit d5a4685b authored by Pavan Balaji's avatar Pavan Balaji
Browse files

Move static function to sit inside !defined MPICH_MPI_FROM_PMPI.


Signed-off-by: default avatarWesley Bland <wbland@anl.gov>
parent 26f9381c
......@@ -21,6 +21,12 @@ int MPI_Intercomm_merge(MPI_Comm intercomm, int high, MPI_Comm *newintracomm) __
/* -- End Profiling Symbol Block */
/* Define MPICH_MPI_FROM_PMPI if weak symbols are not supported to build
the MPI routines */
#ifndef MPICH_MPI_FROM_PMPI
#undef MPI_Intercomm_merge
#define MPI_Intercomm_merge PMPI_Intercomm_merge
/* This function creates VCRT for new communicator
* basing on VCRT of existing communicator.
*/
......@@ -73,12 +79,6 @@ fn_fail:
return mpi_errno;
}
/* Define MPICH_MPI_FROM_PMPI if weak symbols are not supported to build
the MPI routines */
#ifndef MPICH_MPI_FROM_PMPI
#undef MPI_Intercomm_merge
#define MPI_Intercomm_merge PMPI_Intercomm_merge
#undef FUNCNAME
#define FUNCNAME MPIR_Intercomm_merge_impl
#undef FCNAME
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment