Skip to content

Commit 6fa7a48

Browse files
committed
pr feedback
Signed-off-by: Howard Pritchard <[email protected]>
1 parent 57d271e commit 6fa7a48

File tree

3 files changed

+4
-6
lines changed

3 files changed

+4
-6
lines changed

ompi/datatype/ompi_datatype_create.c

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -132,6 +132,8 @@ ompi_datatype_duplicate( const ompi_datatype_t* oldType, ompi_datatype_t** newTy
132132
int
133133
ompi_datatype_get_value_index(const ompi_datatype_t *value_type, const ompi_datatype_t *index_type, ompi_datatype_t **pair_type)
134134
{
135+
*pair_type = (ompi_datatype_t *)&ompi_mpi_datatype_null;
136+
135137
/* C predefined data types */
136138
if (index_type->id == OMPI_DATATYPE_MPI_INT) {
137139
if (value_type->id == OMPI_DATATYPE_MPI_FLOAT) {
@@ -146,8 +148,6 @@ ompi_datatype_get_value_index(const ompi_datatype_t *value_type, const ompi_data
146148
*pair_type = (ompi_datatype_t *)&ompi_mpi_2int;
147149
} else if (value_type->id == OMPI_DATATYPE_MPI_LONG_DOUBLE) {
148150
*pair_type = (ompi_datatype_t *)&ompi_mpi_longdbl_int;
149-
} else {
150-
*pair_type = (ompi_datatype_t *)&ompi_mpi_datatype_null;
151151
}
152152
/* Fortran predefined data types */
153153
} else if ((index_type->id == OMPI_DATATYPE_MPI_INTEGER) &&
@@ -169,8 +169,6 @@ ompi_datatype_get_value_index(const ompi_datatype_t *value_type, const ompi_data
169169
(value_type->id == OMPI_DATATYPE_MPI_DOUBLE_COMPLEX)) {
170170
*pair_type = (ompi_datatype_t *)&ompi_mpi_2dblcplex;
171171
#endif
172-
} else {
173-
*pair_type = (ompi_datatype_t *)&ompi_mpi_datatype_null;
174172
}
175173

176174
return OMPI_SUCCESS;

ompi/mpi/fortran/mpif-h/Makefile.am

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -476,7 +476,7 @@ lib@OMPI_LIBMPI_NAME@_mpifh_la_SOURCES += \
476476
type_get_name_f.c \
477477
type_get_true_extent_f.c \
478478
type_get_true_extent_x_f.c \
479-
type_get_value_index_f.c \
479+
type_get_value_index_f.c \
480480
type_indexed_f.c \
481481
type_match_size_f.c \
482482
type_set_attr_f.c \

ompi/mpi/fortran/mpif-h/profile/Makefile.am

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -387,7 +387,7 @@ linked_files = \
387387
ptype_get_name_f.c \
388388
ptype_get_true_extent_f.c \
389389
ptype_get_true_extent_x_f.c \
390-
ptype_get_value_index_f.c \
390+
ptype_get_value_index_f.c \
391391
ptype_indexed_f.c \
392392
ptype_match_size_f.c \
393393
ptype_set_attr_f.c \

0 commit comments

Comments
 (0)