This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "MPICH primary repository". The branch, master has been updated via 73859c0ebd49da4d4522fa239afe2d3bfa235f8e (commit) from 5c1bd3d411c7e40c9d8f9f868f00fd48a525c198 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- http://git.mpich.org/mpich.git/commitdiff/73859c0ebd49da4d4522fa239afe2d3bfa... commit 73859c0ebd49da4d4522fa239afe2d3bfa235f8e Author: Junchao Zhang <[email protected]> Date: Tue Nov 4 14:34:45 2014 -0600 Uncomment some code in F08 since the cce bug is fixed It was commented out due to a cce/8.3.0 bug. Since the bug is fixed in cce/8.3.2, we can safely uncomment the code. No reviewer diff --git a/src/binding/fortran/use_mpi_f08/wrappers_f/register_datarep_f08ts.F90 b/src/binding/fortran/use_mpi_f08/wrappers_f/register_datarep_f08ts.F90 index a687844..fda3212 100644 --- a/src/binding/fortran/use_mpi_f08/wrappers_f/register_datarep_f08ts.F90 +++ b/src/binding/fortran/use_mpi_f08/wrappers_f/register_datarep_f08ts.F90 @@ -35,13 +35,13 @@ subroutine MPI_Register_datarep_f08(datarep, read_conversion_fn, write_conversio write_conversion_fn_c = c_funloc(write_conversion_fn) dtype_file_extent_fn_c = c_funloc(dtype_file_extent_fn) - !if (c_associated(read_conversion_fn_c, c_funloc(MPI_CONVERSION_FN_NULL))) then - ! read_conversion_fn_c = C_NULL_FUNPTR - !end if + if (c_associated(read_conversion_fn_c, c_funloc(MPI_CONVERSION_FN_NULL))) then + read_conversion_fn_c = C_NULL_FUNPTR + end if - !if (c_associated(write_conversion_fn_c, c_funloc(MPI_CONVERSION_FN_NULL))) then - ! read_conversion_fn_c = C_NULL_FUNPTR - !end if + if (c_associated(write_conversion_fn_c, c_funloc(MPI_CONVERSION_FN_NULL))) then + write_conversion_fn_c = C_NULL_FUNPTR + end if ierror_c = MPIR_Register_datarep_c(datarep_c, read_conversion_fn_c, write_conversion_fn_c, & dtype_file_extent_fn_c, extra_state) ----------------------------------------------------------------------- Summary of changes: .../wrappers_f/register_datarep_f08ts.F90 | 12 ++++++------ 1 files changed, 6 insertions(+), 6 deletions(-) hooks/post-receive -- MPICH primary repository