Skip to content

Commit 46f40da

Browse files
Alessandro FanfarilloDamian Rouson
authored andcommitted
Removing MPI_INTEGER_2 to be compatible with MPI-MPT
1 parent e5b8772 commit 46f40da

File tree

1 file changed

+7
-7
lines changed

1 file changed

+7
-7
lines changed

src/mpi/mpi_caf.c

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -5314,13 +5314,13 @@ GEN_REDUCTION (do_max_int1, int8_t,
53145314
inoutvec[i] = invec[i] <= inoutvec[i] ? inoutvec[i] : invec[i])
53155315
#endif
53165316

5317-
#ifndef MPI_INTEGER2
5318-
GEN_REDUCTION (do_sum_int1, int16_t, inoutvec[i] += invec[i])
5319-
GEN_REDUCTION (do_min_int1, int16_t,
5320-
inoutvec[i] = invec[i] >= inoutvec[i] ? inoutvec[i] : invec[i])
5321-
GEN_REDUCTION (do_max_int1, int16_t,
5322-
inoutvec[i] = invec[i] <= inoutvec[i] ? inoutvec[i] : invec[i])
5323-
#endif
5317+
/* #ifndef MPI_INTEGER2 */
5318+
/* GEN_REDUCTION (do_sum_int1, int16_t, inoutvec[i] += invec[i]) */
5319+
/* GEN_REDUCTION (do_min_int1, int16_t, */
5320+
/* inoutvec[i] = invec[i] >= inoutvec[i] ? inoutvec[i] : invec[i]) */
5321+
/* GEN_REDUCTION (do_max_int1, int16_t, */
5322+
/* inoutvec[i] = invec[i] <= inoutvec[i] ? inoutvec[i] : invec[i]) */
5323+
/* #endif */
53245324

53255325
#if defined(MPI_INTEGER16) && defined(GFC_INTEGER_16)
53265326
GEN_REDUCTION (do_sum_int1, GFC_INTEGER_16, inoutvec[i] += invec[i])

0 commit comments

Comments
 (0)