Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Update copyright lines for 2022.
[simgrid.git] / include / smpi / mpif.h.in
index 6b2a701..94ce3cd 100644 (file)
@@ -1,5 +1,5 @@
 ! -*- fortran -*-
-! Copyright (c) 2010-2021. The SimGrid Team.
+! Copyright (c) 2010-2022. The SimGrid Team.
 ! All rights reserved.
 
 ! This program is free software; you can redistribute it and/or modify it
@@ -15,7 +15,7 @@
       parameter(MPI_THREAD_MULTIPLE=3)
 
       integer MPI_MAX_PROCESSOR_NAME, MPI_MAX_ERROR_STRING
-      integer MPI_MAX_DATAREP_STRIN, MPI_MAX_INFO_KEY
+      integer MPI_MAX_DATAREP_STRING, MPI_MAX_INFO_KEY
       integer MPI_MAX_INFO_VAL, MPI_MAX_OBJECT_NAME, MPI_MAX_PORT_NAME
       integer MPI_ANY_SOURCE, MPI_PROC_NULL, MPI_ANY_TAG, MPI_UNDEFINED
       integer MPI_SOURCE, MPI_TAG, MPI_ERROR
@@ -23,7 +23,7 @@
       integer MPI_LOCK_EXCLUSIVE, MPI_LOCK_SHARED
       parameter(MPI_MAX_PROCESSOR_NAME=100)
       parameter(MPI_MAX_ERROR_STRING=100)
-      parameter(MPI_MAX_DATAREP_STRIN =100)
+      parameter(MPI_MAX_DATAREP_STRING=128)
       parameter(MPI_MAX_INFO_KEY=100)
       parameter(MPI_MAX_INFO_VAL=100)
       parameter(MPI_MAX_OBJECT_NAME=100)
 
       parameter(MPI_BYTE=1)
       parameter(MPI_CHARACTER=2)
-      parameter(MPI_LOGICAL=3)
+      parameter(MPI_LOGICAL=18)
       parameter(MPI_INT=4)
       parameter(MPI_INTEGER=4)
       parameter(MPI_INTEGER1=5)
       integer MPI_LB, MPI_UB
       parameter(MPI_LB=44)
       parameter(MPI_UB=45)
-      
+
       INTEGER MPI_ADDRESS_KIND, MPI_OFFSET_KIND
       PARAMETER (MPI_ADDRESS_KIND=@CMAKE_SIZEOF_VOID_P@)
       PARAMETER (MPI_OFFSET_KIND=@CMAKE_SIZEOF_VOID_P@)
       integer MPI_MODE_UNIQUE_OPEN, MPI_MODE_APPEND, MPI_MODE_SEQUENTIAL
       integer MPI_FILE_NULL
       integer MPI_DISPLACEMENT_CURRENT, MPI_SEEK_SET, MPI_SEEK_CUR
-      integer MPI_MAX_DATAREP_STRING
       parameter(MPI_FILE_NULL=0)
       parameter(MPI_DISPLACEMENT_CURRENT=-54278278)
       parameter(MPI_SEEK_SET=600)
       parameter(MPI_SEEK_CUR=602)
-      parameter(MPI_MAX_DATAREP_STRING=128)
 
       parameter( MPI_MODE_RDONLY=2)
       parameter( MPI_MODE_RDWR=8)