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

- Add more missing fortran values

Просмотр исходного кода 
- Add warnings to not tamper with constant values in mpi.h.in without
  also adjusting mpif.h.in

This commit was SVN r7520.
Этот коммит содержится в:
Jeff Squyres 2005-09-27 17:47:21 +00:00
родитель 9d2c2d4ab8
Коммит 621fb2b99e
2 изменённых файлов: 78 добавлений и 5 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

6
include/mpi.h.in
Просмотреть файл

@ -258,7 +258,7 @@ typedef int (MPI_Grequest_cancel_function)(void *, int);
* Predefined attribute keyvals
*
* DO NOT CHANGE THE ORDER WITHOUT ALSO CHANGING THE ORDER IN
* src/attribute/attribute_predefined.c.
* src/attribute/attribute_predefined.c and mpif.h.in.
*/
enum {
/* MPI-1 */
@ -285,6 +285,7 @@ enum {
/*
* Error classes and codes
* Do not change the values of these without also modifying mpif.h.in.
*/
#define MPI_SUCCESS 0
#define MPI_ERR_BUFFER 1
@ -348,6 +349,7 @@ enum {
/*
* Comparison results. Don't change the order of these, the group
* comparison functions rely on it.
* Do not change the order of these without also modifying mpif.h.in.
*/
enum {
MPI_IDENT,
@ -358,6 +360,7 @@ enum {
/*
* MPI_Init_thread constants
* Do not change the order of these without also modifying mpif.h.in.
*/
enum {
MPI_THREAD_SINGLE,
@ -368,6 +371,7 @@ enum {
/*
* Datatype combiners.
* Do not change the order of these without also modifying mpif.h.in.
*/
enum {
MPI_COMBINER_NAMED,

77
include/mpif.h.in
Просмотреть файл

@ -79,11 +79,15 @@
!
integer MPI_ANY_SOURCE, MPI_ANY_TAG
integer MPI_PROC_NULL, MPI_MAX_PROCESSOR_NAME
integer MPI_ROOT, MPI_MAX_DATAREP_STRING
integer MPI_MAX_ERROR_STRING, MPI_UNDEFINED
integer MPI_CART, MPI_GRAPH, MPI_KEYVAL_INVALID
integer MPI_STATUS_SIZE, MPI_SOURCE, MPI_TAG, MPI_ERROR
integer MPI_TAG_UB, MPI_HOST, MPI_IO, MPI_WTIME_IS_GLOBAL
integer MPI_UNIVERSE_SIZE, MPI_APPNUM, MPI_BSEND_OVERHEAD
integer MPI_APPNUM, MPI_LASTUSEDCODE, MPI_UNIVERSE_SIZE
integer MPI_WIN_BASE, MPI_WIN_SIZE, MPI_WIN_DISP_UNIT
integer IMPI_CLIENT_SIZE, IMPI_CLIENT_COLOR
integer IMPI_HOST_SIZE, IMPI_HOST_COLOR
integer MPI_MAX_INFO_KEY, MPI_MAX_INFO_VAL
integer MPI_MAX_PORT_NAME, MPI_MAX_OBJECT_NAME
integer MPI_ORDER_C, MPI_ORDER_FORTRAN
@ -92,14 +96,20 @@
integer MPI_TYPECLASS_INTEGER, MPI_TYPECLASS_REAL
integer MPI_TYPECLASS_COMPLEX
integer MPI_SEEK_SET, MPI_SEEK_CUR, MPI_SEEK_END
integer MPI_MODE_CREATE, MPI_MODE_WRONLY
integer MPI_MODE_CREATE
integer MPI_MODE_RDONLY, MPI_MODE_WRONLY, MPI_MODE_RDWR
integer MPI_MODE_DELETE_ON_CLOSE, MPI_MODE_UNIQUE_OPEN
integer MPI_MODE_EXCL, MPI_MODE_APPEND, MPI_MODE_SEQUENTIAL
integer MPI_DISPLAYCEMENT_CURRENT
@OMPI_F77_WIN_ATTR_KEYS@
parameter (MPI_ANY_SOURCE=-1)
parameter (MPI_ANY_TAG=-1)
parameter (MPI_PROC_NULL=-2)
parameter (MPI_ROOT=-4)
parameter (MPI_MAX_PROCESSOR_NAME=255)
parameter (MPI_MAX_ERROR_STRING=255)
parameter (MPI_MAX_DATAREP_STRING=128)
parameter (MPI_UNDEFINED=-32766)
parameter (MPI_CART=1)
parameter (MPI_GRAPH=2)
@ -112,8 +122,17 @@
parameter (MPI_HOST=1)
parameter (MPI_IO=2)
parameter (MPI_WTIME_IS_GLOBAL=3)
parameter (MPI_UNIVERSE_SIZE=4)
parameter (MPI_APPNUM=5)
parameter (MPI_APPNUM=4)
parameter (MPI_LASTUSEDCODE=5)
parameter (MPI_UNIVERSE_SIZE=6)
parameter (MPI_WIN_BASE=7)
parameter (MPI_WIN_SIZE=8)
parameter (MPI_WIN_DISP_UNIT=9)
parameter (IMPI_CLIENT_SIZE=10)
parameter (IMPI_CLIENT_COLOR=11)
parameter (IMPI_HOST_SIZE=12)
parameter (IMPI_HOST_COLOR=13)
@OMPI_F77_WIN_ATTR_BASE_VALUE@
@OMPI_F77_WIN_ATTR_SIZE_VALUE@
@OMPI_F77_WIN_ATTR_DISP_VALUE@
@ -134,6 +153,16 @@
parameter (MPI_SEEK_SET=600)
parameter (MPI_SEEK_CUR=602)
parameter (MPI_SEEK_END=604)
parameter (MPI_MODE_CREATE=1)
parameter (MPI_MODE_RDONLY=2)
parameter (MPI_MODE_WRONLY=4)
parameter (MPI_MODE_RDWR=8)
parameter (MPI_MODE_DELETE_ON_CLOSE=16)
parameter (MPI_MODE_UNIQUE_OPEN=32)
parameter (MPI_MODE_EXCL=64)
parameter (MPI_MODE_APPEND=128)
parameter (MPI_MODE_SEQUENTIAL=256)
parameter (MPI_DISPLACEMENT_CURRENT=-54278278)
!
! global variables
!
@ -300,6 +329,46 @@
parameter (MPI_SIMILAR=2)
parameter (MPI_UNEQUAL=3)
!
! datatype combiners
!
integer MPI_COMBINER_NAMED,
integer MPI_COMBINER_DUP,
integer MPI_COMBINER_CONTIGUOUS,
integer MPI_COMBINER_VECTOR,
integer MPI_COMBINER_HVECTOR_INTEGER,
integer MPI_COMBINER_HVECTOR,
integer MPI_COMBINER_INDEXED,
integer MPI_COMBINER_HINDEXED_INTEGER,
integer MPI_COMBINER_HINDEXED,
integer MPI_COMBINER_INDEXED_BLOCK,
integer MPI_COMBINER_STRUCT_INTEGER,
integer MPI_COMBINER_STRUCT,
integer MPI_COMBINER_SUBARRAY,
integer MPI_COMBINER_DARRAY,
integer MPI_COMBINER_F90_REAL,
integer MPI_COMBINER_F90_COMPLEX,
integer MPI_COMBINER_F90_INTEGER,
integer MPI_COMBINER_RESIZED
parameter (MPI_COMBINER_NAMED=0)
parameter (MPI_COMBINER_DUP=1)
parameter (MPI_COMBINER_CONTIGUOUS=2)
parameter (MPI_COMBINER_VECTOR=3)
parameter (MPI_COMBINER_HVECTOR_INTEGER=4)
parameter (MPI_COMBINER_HVECTOR=5)
parameter (MPI_COMBINER_INDEXED=6)
parameter (MPI_COMBINER_HINDEXED_INTEGER=7)
parameter (MPI_COMBINER_HINDEXED=8)
parameter (MPI_COMBINER_INDEXED_BLOCK=9)
parameter (MPI_COMBINER_STRUCT_INTEGER=10)
parameter (MPI_COMBINER_STRUCT=11)
parameter (MPI_COMBINER_SUBARRAY=12)
parameter (MPI_COMBINER_DARRAY=13)
parameter (MPI_COMBINER_F90_REAL=14)
parameter (MPI_COMBINER_F90_COMPLEX=15)
parameter (MPI_COMBINER_F90_INTEGER=16)
parameter (MPI_COMBINER_RESIZE=17)
!
! lookup table indices
!
integer MPI_COMM_WORLD, MPI_COMM_SELF