[mpich2-commits] r4152 - mpich2/trunk/src/mpi/coll

[goodell at mcs.anl.gov]

Author: goodell
Date: 2009-03-20 17:17:29 -0500 (Fri, 20 Mar 2009)
New Revision: 4152

Modified:
   mpich2/trunk/src/mpi/coll/oputil.h
Log:
Fix broken MPI_DOUBLE_COMPLEX type in predefined ops (ticket #485).

No reviewer.

Modified: mpich2/trunk/src/mpi/coll/oputil.h
===================================================================
--- mpich2/trunk/src/mpi/coll/oputil.h	2009-03-20 22:17:27 UTC (rev 4151)
+++ mpich2/trunk/src/mpi/coll/oputil.h	2009-03-20 22:17:29 UTC (rev 4152)
@@ -220,6 +220,7 @@
 #define MPIR_OP_TYPE_GROUP_COMPLEX                          \
     MPIR_OP_TYPE_MACRO_HAVE_FORTRAN(MPI_COMPLEX, s_complex)
 #define MPIR_OP_TYPE_GROUP_COMPLEX_EXTRA                                                            \
+    MPIR_OP_TYPE_MACRO_HAVE_FORTRAN(MPI_DOUBLE_COMPLEX, d_complex)                                  \
     MPIR_OP_TYPE_MACRO_HAVE_COMPLEX8(MPI_COMPLEX8, s_complex)                                       \
     MPIR_OP_TYPE_MACRO_HAVE_COMPLEX16(MPI_COMPLEX16, d_complex)                                     \
     MPIR_OP_TYPE_MACRO_HAVE_CXX_COMPLEX(MPIR_CXX_COMPLEX_VALUE, s_complex)                          \