ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

More ddt updates

Просмотр исходного кода 
This commit was SVN r2759.
Этот коммит содержится в:
Jeff Squyres 2004-09-19 08:08:54 +00:00
родитель f559b54df4
Коммит 0713bb4955
1 изменённых файлов: 15 добавлений и 15 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

30
src/mpi/cxx/mpicxx.cc
Просмотреть файл

@ -98,25 +98,25 @@ const Datatype LONG_DOUBLE_INT(MPI_LONG_DOUBLE);
#if OMPI_WANT_F77_BINDINGS #if OMPI_WANT_F77_BINDINGS
// elementary datatype (Fortran) // elementary datatype (Fortran)
const Datatype INTEGER(ompi_mpi_integer); const Datatype REAL(&ompi_mpi_real);
const Datatype REAL(ompi_mpi_real); const Datatype INTEGER(&ompi_mpi_integer);
const Datatype DOUBLE_PRECISION(ompi_mpi_dblprec); const Datatype DOUBLE_PRECISION(&ompi_mpi_dblprec);
const Datatype F_COMPLEX(ompi_mpi_cplex); const Datatype F_COMPLEX(&ompi_mpi_cplex);
const Datatype LOGICAL(ompi_mpi_logic); const Datatype LOGICAL(&ompi_mpi_logic);
const Datatype CHARACTER(ompi_mpi_character); const Datatype CHARACTER(&ompi_mpi_character);
// datatype for reduction functions (Fortran) // datatype for reduction functions (Fortran)
const Datatype TWOREAL(ompi_mpi_2real); const Datatype TWOREAL(&ompi_mpi_2real);
const Datatype TWODOUBLE_PRECISION(ompi_mpi_2dblprec); const Datatype TWODOUBLE_PRECISION(&ompi_mpi_2dblprec);
const Datatype TWOINTEGER(ompi_mpi_2integer); const Datatype TWOINTEGER(&ompi_mpi_2integer);
// optional datatypes (Fortran) // optional datatypes (Fortran)
const Datatype INTEGER2(ompi_mpi_integer); const Datatype INTEGER2(&ompi_mpi_integer);
const Datatype REAL2(ompi_mpi_real); const Datatype REAL2(&ompi_mpi_real);
const Datatype INTEGER1(ompi_mpi_char); const Datatype INTEGER1(&ompi_mpi_char);
const Datatype INTEGER4(ompi_mpi_short); const Datatype INTEGER4(&ompi_mpi_short);
const Datatype REAL4(ompi_mpi_real); const Datatype REAL4(&ompi_mpi_real);
const Datatype REAL8(ompi_mpi_double); const Datatype REAL8(&ompi_mpi_double);
#endif // OMPI_WANT_f77_BINDINGS #endif // OMPI_WANT_f77_BINDINGS