Shame on me for not reviewing my diff before committing. :-(
Remove some debugging junk. This commit was SVN r2883.
Этот коммит содержится в:
родитель
5818adf6a4
Коммит
f14cc9d4b9
@ -318,26 +318,7 @@ LOC_FUNC(maxloc, float_int, >)
|
|||||||
LOC_FUNC(maxloc, double_int, >)
|
LOC_FUNC(maxloc, double_int, >)
|
||||||
LOC_FUNC(maxloc, long_int, >)
|
LOC_FUNC(maxloc, long_int, >)
|
||||||
LOC_FUNC(maxloc, 2int, >)
|
LOC_FUNC(maxloc, 2int, >)
|
||||||
#if 0
|
|
||||||
#define LOC_FUNC(name, type_name, op) \
|
|
||||||
LOC_FUNC(maxloc, short_int, >)
|
LOC_FUNC(maxloc, short_int, >)
|
||||||
#else
|
|
||||||
void ompi_mpi_op_maxloc_short_int(void *in, void *out, int *count,
|
|
||||||
MPI_Datatype *dtype)
|
|
||||||
{
|
|
||||||
int i;
|
|
||||||
ompi_op_predefined_short_int_t *a = (ompi_op_predefined_short_int_t*) in;
|
|
||||||
ompi_op_predefined_short_int_t *b = (ompi_op_predefined_short_int_t*) out;
|
|
||||||
for (i = 0; i < *count; ++i, a++, b++ ) {
|
|
||||||
if (a->v > b->v) {
|
|
||||||
b->v = a->v;
|
|
||||||
b->k = a->k;
|
|
||||||
} else if (a->v == b->v) {
|
|
||||||
b->k = (b->k < a->k ? b->k : a->k);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
#endif
|
|
||||||
LOC_FUNC(maxloc, long_double_int, >)
|
LOC_FUNC(maxloc, long_double_int, >)
|
||||||
|
|
||||||
/*************************************************************************
|
/*************************************************************************
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user