forked from pool/mvapich2
5a9588822a
- Update so mvapich2 2.3.4 - See CHANGELOG for fixes and new features - Add fix-missing-return-code.patch to fix compilation errors - Add 0001-Drop-Real-16.patch to disable Real(16) support on Armv7 OBS-URL: https://build.opensuse.org/request/show/812877 OBS-URL: https://build.opensuse.org/package/show/science:HPC/mvapich2?expand=0&rev=70
282 lines
10 KiB
Diff
282 lines
10 KiB
Diff
commit 55d03ccf1f3969b185f00e5572c5a0675e000264
|
|
Author: Nicolas Morey-Chaisemartin <nmoreychaisemartin@suse.com>
|
|
Date: Fri Jun 5 10:11:12 2020 +0200
|
|
|
|
0001 Drop Real(16)
|
|
|
|
Real(16) does not work on armv7
|
|
|
|
Signed-off-by: Nicolas Morey-Chaisemartin <nmoreychaisemartin@suse.com>
|
|
|
|
diff --git src/binding/fortran/mpif_h/Makefile.mk src/binding/fortran/mpif_h/Makefile.mk
|
|
index d2de6bc779ac..73049dbd9379 100644
|
|
--- src/binding/fortran/mpif_h/Makefile.mk
|
|
+++ src/binding/fortran/mpif_h/Makefile.mk
|
|
@@ -390,7 +390,6 @@ mpi_f77_sources += src/binding/fortran/mpif_h/sendf.c \
|
|
src/binding/fortran/mpif_h/null_type_copy_fnf.c
|
|
mpi_core_sources += src/binding/fortran/mpif_h/fdebug.c \
|
|
src/binding/fortran/mpif_h/setbot.c \
|
|
- src/binding/fortran/mpif_h/fortran_ops.F \
|
|
src/binding/fortran/mpif_h/setbotf.f
|
|
mpi_sources += src/binding/fortran/mpif_h/statusf2c.c src/binding/fortran/mpif_h/statusc2f.c
|
|
|
|
diff --git src/binding/fortran/mpif_h/buildiface src/binding/fortran/mpif_h/buildiface
|
|
index 2b7a77f22c90..9eebc69a4359 100755
|
|
--- src/binding/fortran/mpif_h/buildiface
|
|
+++ src/binding/fortran/mpif_h/buildiface
|
|
@@ -1045,7 +1045,6 @@ EOT
|
|
print MAKEFD <<EOT;
|
|
mpi_core_sources += src/binding/fortran/mpif_h/fdebug.c \\
|
|
src/binding/fortran/mpif_h/setbot.c \\
|
|
- src/binding/fortran/mpif_h/fortran_ops.F \\
|
|
src/binding/fortran/mpif_h/setbotf.f
|
|
mpi_sources += src/binding/fortran/mpif_h/statusf2c.c src/binding/fortran/mpif_h/statusc2f.c
|
|
|
|
diff --git src/mpi/coll/opland.c src/mpi/coll/opland.c
|
|
index 2fecd3d5fc59..59b208809471 100644
|
|
--- src/mpi/coll/opland.c
|
|
+++ src/mpi/coll/opland.c
|
|
@@ -79,7 +79,7 @@ void MPIR_LAND (
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
#ifdef __ibmxl__
|
|
@@ -88,7 +88,7 @@ void MPIR_LAND (
|
|
real16_land_(invec, inoutvec, Len);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
default: {
|
|
MPID_THREADPRIV_DECL;
|
|
@@ -123,10 +123,10 @@ int MPIR_LAND_check_dtype ( MPI_Datatype type )
|
|
MPIR_OP_TYPE_GROUP(FLOATING_POINT)
|
|
MPIR_OP_TYPE_GROUP(FLOATING_POINT_EXTRA)
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
return MPI_SUCCESS;
|
|
diff --git src/mpi/coll/oplor.c src/mpi/coll/oplor.c
|
|
index cd340db11edf..81ba1a166cf7 100644
|
|
--- src/mpi/coll/oplor.c
|
|
+++ src/mpi/coll/oplor.c
|
|
@@ -79,7 +79,7 @@ void MPIR_LOR (
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
#ifdef __ibmxl__
|
|
@@ -88,7 +88,7 @@ void MPIR_LOR (
|
|
real16_lor_(invec, inoutvec, Len);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
default: {
|
|
MPID_THREADPRIV_DECL;
|
|
@@ -124,10 +124,10 @@ int MPIR_LOR_check_dtype ( MPI_Datatype type )
|
|
MPIR_OP_TYPE_GROUP(FLOATING_POINT_EXTRA)
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
return MPI_SUCCESS;
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
diff --git src/mpi/coll/opmax.c src/mpi/coll/opmax.c
|
|
index fde306a32512..c933bdd1ab18 100644
|
|
--- src/mpi/coll/opmax.c
|
|
+++ src/mpi/coll/opmax.c
|
|
@@ -45,7 +45,7 @@ void MPIR_MAXF(
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
#ifdef __ibmxl__
|
|
@@ -54,7 +54,7 @@ void MPIR_MAXF(
|
|
real16_max_(invec, inoutvec, Len);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
default: {
|
|
MPID_THREADPRIV_DECL;
|
|
@@ -84,10 +84,10 @@ int MPIR_MAXF_check_dtype( MPI_Datatype type )
|
|
MPIR_OP_TYPE_GROUP(FORTRAN_INTEGER_EXTRA)
|
|
MPIR_OP_TYPE_GROUP(FLOATING_POINT_EXTRA)
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
return MPI_SUCCESS;
|
|
diff --git src/mpi/coll/opmaxloc.c src/mpi/coll/opmaxloc.c
|
|
index 56387843bdc8..036e50f02dea 100644
|
|
--- src/mpi/coll/opmaxloc.c
|
|
+++ src/mpi/coll/opmaxloc.c
|
|
@@ -146,7 +146,7 @@ void MPIR_MAXLOC(
|
|
case MPI_2INTEGER: MPIR_MAXLOC_F_CASE(MPI_Fint);
|
|
case MPI_2REAL: MPIR_MAXLOC_F_CASE(MPIR_FC_REAL_CTYPE);
|
|
case MPI_2DOUBLE_PRECISION: MPIR_MAXLOC_F_CASE(MPIR_FC_DOUBLE_CTYPE);
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
#ifdef __ibmxl__
|
|
@@ -155,7 +155,7 @@ void MPIR_MAXLOC(
|
|
real16_maxloc_(invec, inoutvec, &flen);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif
|
|
#endif
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
@@ -196,11 +196,11 @@ int MPIR_MAXLOC_check_dtype( MPI_Datatype type )
|
|
case MPI_2INTEGER:
|
|
case MPI_2REAL:
|
|
case MPI_2DOUBLE_PRECISION:
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif
|
|
#endif
|
|
|
|
diff --git src/mpi/coll/opmin.c src/mpi/coll/opmin.c
|
|
index a9da3e9f1736..1468ae7dba72 100644
|
|
--- src/mpi/coll/opmin.c
|
|
+++ src/mpi/coll/opmin.c
|
|
@@ -43,7 +43,7 @@ void MPIR_MINF (
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
#ifdef __ibmxl__
|
|
@@ -52,7 +52,7 @@ void MPIR_MINF (
|
|
real16_min_(invec, inoutvec, Len);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
default: {
|
|
MPID_THREADPRIV_DECL;
|
|
@@ -82,10 +82,10 @@ int MPIR_MINF_check_dtype ( MPI_Datatype type )
|
|
MPIR_OP_TYPE_GROUP(FORTRAN_INTEGER_EXTRA)
|
|
MPIR_OP_TYPE_GROUP(FLOATING_POINT_EXTRA)
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
return MPI_SUCCESS;
|
|
diff --git src/mpi/coll/opminloc.c src/mpi/coll/opminloc.c
|
|
index ccbfb15fa472..fbbe028aaeb6 100644
|
|
--- src/mpi/coll/opminloc.c
|
|
+++ src/mpi/coll/opminloc.c
|
|
@@ -146,7 +146,7 @@ void MPIR_MINLOC(
|
|
case MPI_2INTEGER: MPIR_MINLOC_F_CASE(MPI_Fint);
|
|
case MPI_2REAL: MPIR_MINLOC_F_CASE(MPIR_FC_REAL_CTYPE);
|
|
case MPI_2DOUBLE_PRECISION: MPIR_MINLOC_F_CASE(MPIR_FC_DOUBLE_CTYPE);
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
#ifdef __ibmxl__
|
|
@@ -155,7 +155,7 @@ void MPIR_MINLOC(
|
|
real16_minloc_(invec, inoutvec, &flen);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif
|
|
#endif
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
@@ -198,11 +198,11 @@ int MPIR_MINLOC_check_dtype( MPI_Datatype type )
|
|
case MPI_2INTEGER:
|
|
case MPI_2REAL:
|
|
case MPI_2DOUBLE_PRECISION:
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif
|
|
#endif
|
|
|
|
diff --git src/mpi/coll/opsum.c src/mpi/coll/opsum.c
|
|
index 43b0f24687af..6f446dd26b1c 100644
|
|
--- src/mpi/coll/opsum.c
|
|
+++ src/mpi/coll/opsum.c
|
|
@@ -66,7 +66,7 @@ void MPIR_SUM (
|
|
#define MPIR_OP_C_COMPLEX_TYPE_MACRO(mpi_type_,c_type_,type_name_) MPIR_OP_TYPE_MACRO(mpi_type_,c_type_,type_name_)
|
|
/* --BEGIN ERROR HANDLING-- */
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case MPI_REAL16:
|
|
#ifdef __ibmxl__
|
|
@@ -75,7 +75,7 @@ void MPIR_SUM (
|
|
real16_sum_(invec, inoutvec, Len);
|
|
#endif
|
|
break;
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
default: {
|
|
MPID_THREADPRIV_DECL;
|
|
@@ -108,10 +108,10 @@ int MPIR_SUM_check_dtype( MPI_Datatype type )
|
|
MPIR_OP_TYPE_GROUP(COMPLEX)
|
|
MPIR_OP_TYPE_GROUP(COMPLEX_EXTRA)
|
|
#ifdef HAVE_FORTRAN_BINDING
|
|
-#ifndef __PGI
|
|
+#if !defined(__PGI) && !defined(__ARM_ARCH_7A__)
|
|
/* As of v20.1, PGI compilers only support real8 */
|
|
case (MPI_REAL16):
|
|
-#endif /*ifndef __PGI*/
|
|
+#endif /*if !defined(__PGI) && !defined(__ARM_ARCH_7A__) */
|
|
#endif /*#ifdef HAVE_FORTRAN_BINDING*/
|
|
#undef MPIR_OP_TYPE_MACRO
|
|
return MPI_SUCCESS;
|