X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/0facf52013684615c801816de974754778c9474a..7e625e5e848a284b522d69ec28cb111f1f88515b:/include/smpi/mpif.h.in diff --git a/include/smpi/mpif.h.in b/include/smpi/mpif.h.in index 6b2a7018a2..04bd335788 100644 --- a/include/smpi/mpif.h.in +++ b/include/smpi/mpif.h.in @@ -1,5 +1,5 @@ ! -*- fortran -*- -! Copyright (c) 2010-2021. The SimGrid Team. +! Copyright (c) 2010-2023. 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) @@ -192,7 +192,7 @@ 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) @@ -242,7 +242,7 @@ 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@) @@ -283,12 +283,10 @@ 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)