c_len 76 ompi/mpi/fortran/mpif-h/comm_get_name_f.c int c_ierr, c_len; c_len 80 ompi/mpi/fortran/mpif-h/comm_get_name_f.c c_ierr = PMPI_Comm_get_name(c_comm, c_name, &c_len); c_len 83 ompi/mpi/fortran/mpif-h/comm_get_name_f.c *resultlen = OMPI_INT_2_FINT(c_len); c_len 73 ompi/mpi/fortran/mpif-h/type_get_name_f.c int c_ierr, c_len; c_len 77 ompi/mpi/fortran/mpif-h/type_get_name_f.c c_ierr = PMPI_Type_get_name(c_type, c_name, &c_len); c_len 80 ompi/mpi/fortran/mpif-h/type_get_name_f.c *resultlen = OMPI_INT_2_FINT(c_len); c_len 75 ompi/mpi/fortran/mpif-h/win_get_name_f.c int c_ierr, c_len; c_len 79 ompi/mpi/fortran/mpif-h/win_get_name_f.c c_ierr = PMPI_Win_get_name(c_win, c_name, &c_len); c_len 82 ompi/mpi/fortran/mpif-h/win_get_name_f.c *resultlen = OMPI_INT_2_FINT(c_len);