diff --git a/mingw-w64-msmpi/PKGBUILD b/mingw-w64-msmpi/PKGBUILD index c3a14629b6..5593f9c6bf 100644 --- a/mingw-w64-msmpi/PKGBUILD +++ b/mingw-w64-msmpi/PKGBUILD @@ -4,7 +4,7 @@ _realname=msmpi pkgbase=mingw-w64-${_realname} pkgname="${MINGW_PACKAGE_PREFIX}-${_realname}" pkgver=10.1.1 -pkgrel=10 +pkgrel=11 pkgdesc="Microsoft MPI SDK (mingw-w64)" arch=('any') mingw_arch=('mingw64' 'ucrt64' 'clang64') @@ -36,10 +36,10 @@ source=( ) sha256sums=('17086fb1cf949251e4ae1549a06d292c58e468c822cca3ac1851e57e79d8ab20' 'baee3f18f38650e7182956baa0d3d8f8e5c26d8603ccee4871a4dbd160c13660' - 'f3384eeb848164e518edfd2b2b9ff1d0f33e267efd5811d5a7c5f79ef7a0a81e' - '38e7be31ad555570f6122058317c08504472b8cfd0a198cdad827519b941ba2c' - '031f910c6ce9a0f7bf66365dd4271fa36530f32c5d22755b10ef2d89dc605e1f' - '4ff6e817fe7517f04f0ca04a038e4c136264384d36f520b79995604e3986fce4' + '66185a4d47ca1a27df2340d3d8d28787e72db54b184f20430ed1e1d7c9244371' + '1abb1645d8211f908f3ca6720c27bd3ca490dd53e0a25cdfe90736a206f4f1fa' + 'edd76b5096bd31052be13e2d3306d931277d9c983b147ecf8aef0761d4ae8fb3' + '126bb8230844ad1de5f7e368c12008d2eea9831cb149b4a6952c775c08b294a2' 'fd18184993872fc4eaea825e85f974dca4b020598d838c424c6c112c2328cf2a' '7b8ed9d3e257e439678cc648164164d6817f7fde68530055b392f67d97bf8ec8' 'ea8203492942fa900c4946741ad88af8957c4d058e06eb618ffae0e5e967b71b' @@ -71,8 +71,6 @@ build() { mpic="$srcdir/mpi.c" if [[ ${MSYSTEM} == CLANG64 ]]; then sed -e "s|gfortran|flang|g" -i ${mpic} - else - fflags="-fallow-invalid-boz -fallow-argument-mismatch" fi cflags="-s -O2 -DNDEBUG" $CC ${cflags} -o bin/mpicc.exe -DCC "${mpic}" @@ -88,7 +86,7 @@ build() { # FORTRAN90 MPI modules if [[ ${MINGW_PACKAGE_PREFIX} != *-clang-* || ${MSYSTEM} == CLANG64 ]]; then - bin/mpifort ${fflags} -c -Jinclude ${srcdir}/mpi.f90 + bin/mpifort -c -Jinclude ${srcdir}/mpi.f90 rm mpi.o fi } diff --git a/mingw-w64-msmpi/mpi.f90 b/mingw-w64-msmpi/mpi.f90 index 22693065c5..0c26882ec5 100644 --- a/mingw-w64-msmpi/mpi.f90 +++ b/mingw-w64-msmpi/mpi.f90 @@ -226,7 +226,7 @@ INTEGER MPI_OP_NULL PARAMETER (MPI_OP_NULL=402653184) INTEGER MPI_DATATYPE_NULL - PARAMETER (MPI_DATATYPE_NULL=z'0c000000') + PARAMETER (MPI_DATATYPE_NULL=0) ! MPI_DATATYPE_NULL=z'0c000000' INTEGER MPI_REQUEST_NULL PARAMETER (MPI_REQUEST_NULL=738197504) INTEGER MPI_ERRHANDLER_NULL @@ -302,114 +302,114 @@ INTEGER MPI_LOCK_SHARED PARAMETER (MPI_LOCK_SHARED=235) INTEGER MPI_CHAR - PARAMETER (MPI_CHAR=z'4c000101') + PARAMETER (MPI_CHAR=1275068673) ! MPI_CHAR=z'4c000101' INTEGER MPI_UNSIGNED_CHAR - PARAMETER (MPI_UNSIGNED_CHAR=z'4c000102') + PARAMETER (MPI_UNSIGNED_CHAR=1275068674) ! MPI_UNSIGNED_CHAR=z'4c000102' INTEGER MPI_SHORT - PARAMETER (MPI_SHORT=z'4c000203') + PARAMETER (MPI_SHORT=1275068931) ! MPI_SHORT=z'4c000203' INTEGER MPI_UNSIGNED_SHORT - PARAMETER (MPI_UNSIGNED_SHORT=z'4c000204') + PARAMETER (MPI_UNSIGNED_SHORT=1275068932) ! MPI_UNSIGNED_SHORT=z'4c000204' INTEGER MPI_INT - PARAMETER (MPI_INT=z'4c000405') + PARAMETER (MPI_INT=1275069445) ! MPI_INT=z'4c000405' INTEGER MPI_UNSIGNED - PARAMETER (MPI_UNSIGNED=z'4c000406') + PARAMETER (MPI_UNSIGNED=1275069446) ! MPI_UNSIGNED=z'4c000406' INTEGER MPI_LONG - PARAMETER (MPI_LONG=z'4c000407') + PARAMETER (MPI_LONG=1275069447) ! MPI_LONG=z'4c000407' INTEGER MPI_UNSIGNED_LONG - PARAMETER (MPI_UNSIGNED_LONG=z'4c000408') + PARAMETER (MPI_UNSIGNED_LONG=1275069448) ! MPI_UNSIGNED_LONG=z'4c000408' INTEGER MPI_LONG_LONG - PARAMETER (MPI_LONG_LONG=z'4c000809') + PARAMETER (MPI_LONG_LONG=1275070473) ! MPI_LONG_LONG=z'4c000809' INTEGER MPI_LONG_LONG_INT - PARAMETER (MPI_LONG_LONG_INT=z'4c000809') + PARAMETER (MPI_LONG_LONG_INT=1275070473) ! MPI_LONG_LONG_INT=z'4c000809' INTEGER MPI_FLOAT - PARAMETER (MPI_FLOAT=z'4c00040a') + PARAMETER (MPI_FLOAT=1275069450) ! MPI_FLOAT=z'4c00040a' INTEGER MPI_DOUBLE - PARAMETER (MPI_DOUBLE=z'4c00080b') + PARAMETER (MPI_DOUBLE=1275070475) ! MPI_DOUBLE=z'4c00080b' INTEGER MPI_LONG_DOUBLE - PARAMETER (MPI_LONG_DOUBLE=z'4c00080c') + PARAMETER (MPI_LONG_DOUBLE=1275070476) ! MPI_LONG_DOUBLE=z'4c00080c' INTEGER MPI_BYTE - PARAMETER (MPI_BYTE=z'4c00010d') + PARAMETER (MPI_BYTE=1275068685) ! MPI_BYTE=z'4c00010d' INTEGER MPI_WCHAR - PARAMETER (MPI_WCHAR=z'4c00020e') + PARAMETER (MPI_WCHAR=1275068942) ! MPI_WCHAR=z'4c00020e' INTEGER MPI_PACKED - PARAMETER (MPI_PACKED=z'4c00010f') + PARAMETER (MPI_PACKED=1275068687) ! MPI_PACKED=z'4c00010f' INTEGER MPI_LB - PARAMETER (MPI_LB=z'4c000010') + PARAMETER (MPI_LB=1275068432) ! MPI_LB=z'4c000010' INTEGER MPI_UB - PARAMETER (MPI_UB=z'4c000011') + PARAMETER (MPI_UB=1275068433) ! MPI_UB=z'4c000011' INTEGER MPI_2INT - PARAMETER (MPI_2INT=z'4c000816') + PARAMETER (MPI_2INT=1275070486) ! MPI_2INT=z'4c000816' INTEGER MPI_SIGNED_CHAR - PARAMETER (MPI_SIGNED_CHAR=z'4c000118') + PARAMETER (MPI_SIGNED_CHAR=1275068696) ! MPI_SIGNED_CHAR=z'4c000118' INTEGER MPI_UNSIGNED_LONG_LONG - PARAMETER (MPI_UNSIGNED_LONG_LONG=z'4c000819') + PARAMETER (MPI_UNSIGNED_LONG_LONG=1275070489) ! MPI_UNSIGNED_LONG_LONG=z'4c000819' INTEGER MPI_CHARACTER - PARAMETER (MPI_CHARACTER=z'4c00011a') + PARAMETER (MPI_CHARACTER=1275068698) ! MPI_CHARACTER=z'4c00011a' INTEGER MPI_INTEGER - PARAMETER (MPI_INTEGER=z'4c00041b') + PARAMETER (MPI_INTEGER=1275069467) ! MPI_INTEGER=z'4c00041b' INTEGER MPI_REAL - PARAMETER (MPI_REAL=z'4c00041c') + PARAMETER (MPI_REAL=1275069468) ! MPI_REAL=z'4c00041c' INTEGER MPI_LOGICAL - PARAMETER (MPI_LOGICAL=z'4c00041d') + PARAMETER (MPI_LOGICAL=1275069469) ! MPI_LOGICAL=z'4c00041d' INTEGER MPI_COMPLEX - PARAMETER (MPI_COMPLEX=z'4c00081e') + PARAMETER (MPI_COMPLEX=1275070494) ! MPI_COMPLEX=z'4c00081e' INTEGER MPI_DOUBLE_PRECISION - PARAMETER (MPI_DOUBLE_PRECISION=z'4c00081f') + PARAMETER (MPI_DOUBLE_PRECISION=1275070495) ! MPI_DOUBLE_PRECISION=z'4c00081f' INTEGER MPI_2INTEGER - PARAMETER (MPI_2INTEGER=z'4c000820') + PARAMETER (MPI_2INTEGER=1275070496) ! MPI_2INTEGER=z'4c000820' INTEGER MPI_2REAL - PARAMETER (MPI_2REAL=z'4c000821') + PARAMETER (MPI_2REAL=1275070497) ! MPI_2REAL=z'4c000821' INTEGER MPI_DOUBLE_COMPLEX - PARAMETER (MPI_DOUBLE_COMPLEX=z'4c001022') + PARAMETER (MPI_DOUBLE_COMPLEX=1275072546) ! MPI_DOUBLE_COMPLEX=z'4c001022' INTEGER MPI_2DOUBLE_PRECISION - PARAMETER (MPI_2DOUBLE_PRECISION=z'4c001023') + PARAMETER (MPI_2DOUBLE_PRECISION=1275072547) ! MPI_2DOUBLE_PRECISION=z'4c001023' INTEGER MPI_2COMPLEX - PARAMETER (MPI_2COMPLEX=z'4c001024') + PARAMETER (MPI_2COMPLEX=1275072548) ! MPI_2COMPLEX=z'4c001024' INTEGER MPI_2DOUBLE_COMPLEX - PARAMETER (MPI_2DOUBLE_COMPLEX=z'4c002025') + PARAMETER (MPI_2DOUBLE_COMPLEX=1275072549) ! MPI_2DOUBLE_COMPLEX=z'4c002025' INTEGER MPI_REAL2 - PARAMETER (MPI_REAL2=z'0c000000') + PARAMETER (MPI_REAL2=201326592) ! MPI_REAL2=z'0c000000' INTEGER MPI_REAL4 - PARAMETER (MPI_REAL4=z'4c000427') + PARAMETER (MPI_REAL4=1275069479) ! MPI_REAL4=z'4c000427' INTEGER MPI_COMPLEX8 - PARAMETER (MPI_COMPLEX8=z'4c000828') + PARAMETER (MPI_COMPLEX8=1275070504) ! MPI_COMPLEX8=z'4c000828' INTEGER MPI_REAL8 - PARAMETER (MPI_REAL8=z'4c000829') + PARAMETER (MPI_REAL8=1275070505) ! MPI_REAL8=z'4c000829' INTEGER MPI_COMPLEX16 - PARAMETER (MPI_COMPLEX16=z'4c00102a') + PARAMETER (MPI_COMPLEX16=1275072554) ! MPI_COMPLEX16=z'4c00102a' INTEGER MPI_REAL16 - PARAMETER (MPI_REAL16=z'0c000000') + PARAMETER (MPI_REAL16=201326592) ! MPI_REAL16=z'0c000000' INTEGER MPI_COMPLEX32 - PARAMETER (MPI_COMPLEX32=z'0c000000') + PARAMETER (MPI_COMPLEX32=201326592) ! MPI_COMPLEX32=z'0c000000' INTEGER MPI_INTEGER1 - PARAMETER (MPI_INTEGER1=z'4c00012d') + PARAMETER (MPI_INTEGER1=1275068717) ! MPI_INTEGER1=z'4c00012d' INTEGER MPI_COMPLEX4 - PARAMETER (MPI_COMPLEX4=z'0c000000') + PARAMETER (MPI_COMPLEX4=201326592) ! MPI_COMPLEX4=z'0c000000' INTEGER MPI_INTEGER2 - PARAMETER (MPI_INTEGER2=z'4c00022f') + PARAMETER (MPI_INTEGER2=1275068975) ! MPI_INTEGER2=z'4c00022f' INTEGER MPI_INTEGER4 - PARAMETER (MPI_INTEGER4=z'4c000430') + PARAMETER (MPI_INTEGER4=1275069488) ! MPI_INTEGER4=z'4c000430' INTEGER MPI_INTEGER8 - PARAMETER (MPI_INTEGER8=z'4c000831') + PARAMETER (MPI_INTEGER8=1275070513) ! MPI_INTEGER8=z'4c000831' INTEGER MPI_INTEGER16 - PARAMETER (MPI_INTEGER16=z'0c000000') + PARAMETER (MPI_INTEGER16=201326592) ! MPI_INTEGER16=z'0c000000' INCLUDE 'mpifptr.h' INTEGER MPI_OFFSET - PARAMETER (MPI_OFFSET=z'4c00083c') + PARAMETER (MPI_OFFSET=1275070524) ! MPI_OFFSET=z'4c00083c' INTEGER MPI_COUNT - PARAMETER (MPI_COUNT=z'4c00083d') + PARAMETER (MPI_COUNT=1275070525) ! MPI_COUNT=z'4c00083d' INTEGER MPI_FLOAT_INT - PARAMETER (MPI_FLOAT_INT=z'8c000000') + PARAMETER (MPI_FLOAT_INT=-1946157056) ! MPI_FLOAT_INT=z'8c000000' INTEGER MPI_DOUBLE_INT - PARAMETER (MPI_DOUBLE_INT=z'8c000001') + PARAMETER (MPI_DOUBLE_INT=-1946157055) ! MPI_DOUBLE_INT=z'8c000001' INTEGER MPI_LONG_INT - PARAMETER (MPI_LONG_INT=z'8c000002') + PARAMETER (MPI_LONG_INT=-1946157054) ! MPI_LONG_INT=z'8c000002' INTEGER MPI_SHORT_INT - PARAMETER (MPI_SHORT_INT=z'8c000003') + PARAMETER (MPI_SHORT_INT=-1946157053) ! MPI_SHORT_INT=z'8c000003' INTEGER MPI_LONG_DOUBLE_INT - PARAMETER (MPI_LONG_DOUBLE_INT=z'8c000004') + PARAMETER (MPI_LONG_DOUBLE_INT=-1946157052) ! MPI_LONG_DOUBLE_INT=z'8c000004' INTEGER MPI_INTEGER_KIND PARAMETER (MPI_INTEGER_KIND=4) INTEGER MPI_OFFSET_KIND diff --git a/mingw-w64-msmpi/mpif.h b/mingw-w64-msmpi/mpif.h index f531a15707..8a48c569b7 100644 --- a/mingw-w64-msmpi/mpif.h +++ b/mingw-w64-msmpi/mpif.h @@ -224,7 +224,7 @@ INTEGER MPI_OP_NULL PARAMETER (MPI_OP_NULL=402653184) INTEGER MPI_DATATYPE_NULL - PARAMETER (MPI_DATATYPE_NULL=z'0c000000') + PARAMETER (MPI_DATATYPE_NULL=0) ! MPI_DATATYPE_NULL=z'0c000000' INTEGER MPI_REQUEST_NULL PARAMETER (MPI_REQUEST_NULL=738197504) INTEGER MPI_ERRHANDLER_NULL @@ -300,114 +300,114 @@ INTEGER MPI_LOCK_SHARED PARAMETER (MPI_LOCK_SHARED=235) INTEGER MPI_CHAR - PARAMETER (MPI_CHAR=z'4c000101') + PARAMETER (MPI_CHAR=1275068673) ! MPI_CHAR=z'4c000101' INTEGER MPI_UNSIGNED_CHAR - PARAMETER (MPI_UNSIGNED_CHAR=z'4c000102') + PARAMETER (MPI_UNSIGNED_CHAR=1275068674) ! MPI_UNSIGNED_CHAR=z'4c000102' INTEGER MPI_SHORT - PARAMETER (MPI_SHORT=z'4c000203') + PARAMETER (MPI_SHORT=1275068931) ! MPI_SHORT=z'4c000203' INTEGER MPI_UNSIGNED_SHORT - PARAMETER (MPI_UNSIGNED_SHORT=z'4c000204') + PARAMETER (MPI_UNSIGNED_SHORT=1275068932) ! MPI_UNSIGNED_SHORT=z'4c000204' INTEGER MPI_INT - PARAMETER (MPI_INT=z'4c000405') + PARAMETER (MPI_INT=1275069445) ! MPI_INT=z'4c000405' INTEGER MPI_UNSIGNED - PARAMETER (MPI_UNSIGNED=z'4c000406') + PARAMETER (MPI_UNSIGNED=1275069446) ! MPI_UNSIGNED=z'4c000406' INTEGER MPI_LONG - PARAMETER (MPI_LONG=z'4c000407') + PARAMETER (MPI_LONG=1275069447) ! MPI_LONG=z'4c000407' INTEGER MPI_UNSIGNED_LONG - PARAMETER (MPI_UNSIGNED_LONG=z'4c000408') + PARAMETER (MPI_UNSIGNED_LONG=1275069448) ! MPI_UNSIGNED_LONG=z'4c000408' INTEGER MPI_LONG_LONG - PARAMETER (MPI_LONG_LONG=z'4c000809') + PARAMETER (MPI_LONG_LONG=1275070473) ! MPI_LONG_LONG=z'4c000809' INTEGER MPI_LONG_LONG_INT - PARAMETER (MPI_LONG_LONG_INT=z'4c000809') + PARAMETER (MPI_LONG_LONG_INT=1275070473) ! MPI_LONG_LONG_INT=z'4c000809' INTEGER MPI_FLOAT - PARAMETER (MPI_FLOAT=z'4c00040a') + PARAMETER (MPI_FLOAT=1275069450) ! MPI_FLOAT=z'4c00040a' INTEGER MPI_DOUBLE - PARAMETER (MPI_DOUBLE=z'4c00080b') + PARAMETER (MPI_DOUBLE=1275070475) ! MPI_DOUBLE=z'4c00080b' INTEGER MPI_LONG_DOUBLE - PARAMETER (MPI_LONG_DOUBLE=z'4c00080c') + PARAMETER (MPI_LONG_DOUBLE=1275070476) ! MPI_LONG_DOUBLE=z'4c00080c' INTEGER MPI_BYTE - PARAMETER (MPI_BYTE=z'4c00010d') + PARAMETER (MPI_BYTE=1275068685) ! MPI_BYTE=z'4c00010d' INTEGER MPI_WCHAR - PARAMETER (MPI_WCHAR=z'4c00020e') + PARAMETER (MPI_WCHAR=1275068942) ! MPI_WCHAR=z'4c00020e' INTEGER MPI_PACKED - PARAMETER (MPI_PACKED=z'4c00010f') + PARAMETER (MPI_PACKED=1275068687) ! MPI_PACKED=z'4c00010f' INTEGER MPI_LB - PARAMETER (MPI_LB=z'4c000010') + PARAMETER (MPI_LB=1275068432) ! MPI_LB=z'4c000010' INTEGER MPI_UB - PARAMETER (MPI_UB=z'4c000011') + PARAMETER (MPI_UB=1275068433) ! MPI_UB=z'4c000011' INTEGER MPI_2INT - PARAMETER (MPI_2INT=z'4c000816') + PARAMETER (MPI_2INT=1275070486) ! MPI_2INT=z'4c000816' INTEGER MPI_SIGNED_CHAR - PARAMETER (MPI_SIGNED_CHAR=z'4c000118') + PARAMETER (MPI_SIGNED_CHAR=1275068696) ! MPI_SIGNED_CHAR=z'4c000118' INTEGER MPI_UNSIGNED_LONG_LONG - PARAMETER (MPI_UNSIGNED_LONG_LONG=z'4c000819') + PARAMETER (MPI_UNSIGNED_LONG_LONG=1275070489) ! MPI_UNSIGNED_LONG_LONG=z'4c000819' INTEGER MPI_CHARACTER - PARAMETER (MPI_CHARACTER=z'4c00011a') + PARAMETER (MPI_CHARACTER=1275068698) ! MPI_CHARACTER=z'4c00011a' INTEGER MPI_INTEGER - PARAMETER (MPI_INTEGER=z'4c00041b') + PARAMETER (MPI_INTEGER=1275069467) ! MPI_INTEGER=z'4c00041b' INTEGER MPI_REAL - PARAMETER (MPI_REAL=z'4c00041c') + PARAMETER (MPI_REAL=1275069468) ! MPI_REAL=z'4c00041c' INTEGER MPI_LOGICAL - PARAMETER (MPI_LOGICAL=z'4c00041d') + PARAMETER (MPI_LOGICAL=1275069469) ! MPI_LOGICAL=z'4c00041d' INTEGER MPI_COMPLEX - PARAMETER (MPI_COMPLEX=z'4c00081e') + PARAMETER (MPI_COMPLEX=1275070494) ! MPI_COMPLEX=z'4c00081e' INTEGER MPI_DOUBLE_PRECISION - PARAMETER (MPI_DOUBLE_PRECISION=z'4c00081f') + PARAMETER (MPI_DOUBLE_PRECISION=1275070495) ! MPI_DOUBLE_PRECISION=z'4c00081f' INTEGER MPI_2INTEGER - PARAMETER (MPI_2INTEGER=z'4c000820') + PARAMETER (MPI_2INTEGER=1275070496) ! MPI_2INTEGER=z'4c000820' INTEGER MPI_2REAL - PARAMETER (MPI_2REAL=z'4c000821') + PARAMETER (MPI_2REAL=1275070497) ! MPI_2REAL=z'4c000821' INTEGER MPI_DOUBLE_COMPLEX - PARAMETER (MPI_DOUBLE_COMPLEX=z'4c001022') + PARAMETER (MPI_DOUBLE_COMPLEX=1275072546) ! MPI_DOUBLE_COMPLEX=z'4c001022' INTEGER MPI_2DOUBLE_PRECISION - PARAMETER (MPI_2DOUBLE_PRECISION=z'4c001023') + PARAMETER (MPI_2DOUBLE_PRECISION=1275072547) ! MPI_2DOUBLE_PRECISION=z'4c001023' INTEGER MPI_2COMPLEX - PARAMETER (MPI_2COMPLEX=z'4c001024') + PARAMETER (MPI_2COMPLEX=1275072548) ! MPI_2COMPLEX=z'4c001024' INTEGER MPI_2DOUBLE_COMPLEX - PARAMETER (MPI_2DOUBLE_COMPLEX=z'4c002025') + PARAMETER (MPI_2DOUBLE_COMPLEX=1275072549) ! MPI_2DOUBLE_COMPLEX=z'4c002025' INTEGER MPI_REAL2 - PARAMETER (MPI_REAL2=z'0c000000') + PARAMETER (MPI_REAL2=201326592) ! MPI_REAL2=z'0c000000' INTEGER MPI_REAL4 - PARAMETER (MPI_REAL4=z'4c000427') + PARAMETER (MPI_REAL4=1275069479) ! MPI_REAL4=z'4c000427' INTEGER MPI_COMPLEX8 - PARAMETER (MPI_COMPLEX8=z'4c000828') + PARAMETER (MPI_COMPLEX8=1275070504) ! MPI_COMPLEX8=z'4c000828' INTEGER MPI_REAL8 - PARAMETER (MPI_REAL8=z'4c000829') + PARAMETER (MPI_REAL8=1275070505) ! MPI_REAL8=z'4c000829' INTEGER MPI_COMPLEX16 - PARAMETER (MPI_COMPLEX16=z'4c00102a') + PARAMETER (MPI_COMPLEX16=1275072554) ! MPI_COMPLEX16=z'4c00102a' INTEGER MPI_REAL16 - PARAMETER (MPI_REAL16=z'0c000000') + PARAMETER (MPI_REAL16=201326592) ! MPI_REAL16=z'0c000000' INTEGER MPI_COMPLEX32 - PARAMETER (MPI_COMPLEX32=z'0c000000') + PARAMETER (MPI_COMPLEX32=201326592) ! MPI_COMPLEX32=z'0c000000' INTEGER MPI_INTEGER1 - PARAMETER (MPI_INTEGER1=z'4c00012d') + PARAMETER (MPI_INTEGER1=1275068717) ! MPI_INTEGER1=z'4c00012d' INTEGER MPI_COMPLEX4 - PARAMETER (MPI_COMPLEX4=z'0c000000') + PARAMETER (MPI_COMPLEX4=201326592) ! MPI_COMPLEX4=z'0c000000' INTEGER MPI_INTEGER2 - PARAMETER (MPI_INTEGER2=z'4c00022f') + PARAMETER (MPI_INTEGER2=1275068975) ! MPI_INTEGER2=z'4c00022f' INTEGER MPI_INTEGER4 - PARAMETER (MPI_INTEGER4=z'4c000430') + PARAMETER (MPI_INTEGER4=1275069488) ! MPI_INTEGER4=z'4c000430' INTEGER MPI_INTEGER8 - PARAMETER (MPI_INTEGER8=z'4c000831') + PARAMETER (MPI_INTEGER8=1275070513) ! MPI_INTEGER8=z'4c000831' INTEGER MPI_INTEGER16 - PARAMETER (MPI_INTEGER16=z'0c000000') + PARAMETER (MPI_INTEGER16=201326592) ! MPI_INTEGER16=z'0c000000' INCLUDE 'mpifptr.h' INTEGER MPI_OFFSET - PARAMETER (MPI_OFFSET=z'4c00083c') + PARAMETER (MPI_OFFSET=1275070524) ! MPI_OFFSET=z'4c00083c' INTEGER MPI_COUNT - PARAMETER (MPI_COUNT=z'4c00083d') + PARAMETER (MPI_COUNT=1275070525) ! MPI_COUNT=z'4c00083d' INTEGER MPI_FLOAT_INT - PARAMETER (MPI_FLOAT_INT=-1946157056) + PARAMETER (MPI_FLOAT_INT=-1946157056) ! MPI_FLOAT_INT=z'8c000000' INTEGER MPI_DOUBLE_INT - PARAMETER (MPI_DOUBLE_INT=-1946157055) + PARAMETER (MPI_DOUBLE_INT=-1946157055) ! MPI_DOUBLE_INT=z'8c000001' INTEGER MPI_LONG_INT - PARAMETER (MPI_LONG_INT=-1946157054) + PARAMETER (MPI_LONG_INT=-1946157054) ! MPI_LONG_INT=z'8c000002' INTEGER MPI_SHORT_INT - PARAMETER (MPI_SHORT_INT=-1946157053) + PARAMETER (MPI_SHORT_INT=-1946157053) ! MPI_SHORT_INT=z'8c000003' INTEGER MPI_LONG_DOUBLE_INT - PARAMETER (MPI_LONG_DOUBLE_INT=-1946157052) + PARAMETER (MPI_LONG_DOUBLE_INT=-1946157052) ! MPI_LONG_DOUBLE_INT=z'8c000004' INTEGER MPI_INTEGER_KIND PARAMETER (MPI_INTEGER_KIND=4) INTEGER MPI_OFFSET_KIND diff --git a/mingw-w64-msmpi/mpifptr.h.i686 b/mingw-w64-msmpi/mpifptr.h.i686 index 1028a1d392..c1c02984ce 100644 --- a/mingw-w64-msmpi/mpifptr.h.i686 +++ b/mingw-w64-msmpi/mpifptr.h.i686 @@ -4,6 +4,6 @@ ! Licensed under the MIT License. ! INTEGER MPI_AINT - PARAMETER (MPI_AINT=z'4c00043b') + PARAMETER (MPI_AINT=1275069499) ! MPI_AINT=z'4c00043b' INTEGER MPI_ADDRESS_KIND PARAMETER(MPI_ADDRESS_KIND = 4) diff --git a/mingw-w64-msmpi/mpifptr.h.x86_64 b/mingw-w64-msmpi/mpifptr.h.x86_64 index 1d4a2888e1..1974f0dfb6 100644 --- a/mingw-w64-msmpi/mpifptr.h.x86_64 +++ b/mingw-w64-msmpi/mpifptr.h.x86_64 @@ -4,6 +4,6 @@ ! Licensed under the MIT License. ! INTEGER MPI_AINT - PARAMETER (MPI_AINT=z'4c00083b') + PARAMETER (MPI_AINT=1275070523) ! MPI_AINT=z'4c00083b' INTEGER MPI_ADDRESS_KIND PARAMETER(MPI_ADDRESS_KIND = 8)