Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
adapt mpif.h for rma
authordegomme <degomme@localhost.localdomain>
Sat, 12 Jul 2014 00:00:35 +0000 (02:00 +0200)
committerdegomme <degomme@localhost.localdomain>
Sat, 12 Jul 2014 00:00:35 +0000 (02:00 +0200)
include/smpi/mpif.h.in

index 4e73752..5732217 100644 (file)
       parameter(MPI_TAG_LB=0)
       parameter(MPI_VERSION=1)
       parameter(MPI_SUBVERSION=1)
+      integer MPI_MODE_NOSTORE, MPI_MODE_NOPUT, MPI_MODE_NOPRECEDE
+      integer MPI_MODE_NOSUCCEED, MPI_MODE_NOCHECK
+      parameter(MPI_MODE_NOSTORE=1)
+      parameter(MPI_MODE_NOPUT=2)
+      parameter(MPI_MODE_NOPRECEDE=4)
+      parameter(MPI_MODE_NOSUCCEED=8)
+      parameter(MPI_MODE_NOCHECK=16)
 
       integer MPI_SUCCESS, MPI_ERR_COMM, MPI_ERR_ARG, MPI_ERR_TYPE
       integer MPI_ERR_REQUEST, MPI_ERR_INTERN, MPI_ERR_COUNT
       INTEGER MPI_ADDRESS_KIND, MPI_OFFSET_KIND
       PARAMETER (MPI_ADDRESS_KIND=@MPI_ADDRESS_SIZE@)
       PARAMETER (MPI_OFFSET_KIND=@MPI_ADDRESS_SIZE@)
-      
-      INTEGER MPI_MODE_NOPRECEDE
-      PARAMETER (MPI_MODE_NOPRECEDE=8192)
 
       integer MPI_COMBINER_NAMED, MPI_COMBINER_DUP
       integer MPI_COMBINER_CONTIGUOUS, MPI_COMBINER_VECTOR