aboutsummaryrefslogtreecommitdiff
path: root/math/scalapack/files/patch-BLACS_SRC_blacs__init__.c
diff options
context:
space:
mode:
Diffstat (limited to 'math/scalapack/files/patch-BLACS_SRC_blacs__init__.c')
-rw-r--r--math/scalapack/files/patch-BLACS_SRC_blacs__init__.c15
1 files changed, 15 insertions, 0 deletions
diff --git a/math/scalapack/files/patch-BLACS_SRC_blacs__init__.c b/math/scalapack/files/patch-BLACS_SRC_blacs__init__.c
new file mode 100644
index 000000000000..642edde152d9
--- /dev/null
+++ b/math/scalapack/files/patch-BLACS_SRC_blacs__init__.c
@@ -0,0 +1,15 @@
+--- BLACS/SRC/blacs_init_.c.orig 2024-08-06 11:44:11 UTC
++++ BLACS/SRC/blacs_init_.c
+@@ -6,7 +6,12 @@ F_VOID_FUNC blacs_gridinit_(Int *ConTxt, F_CHAR order,
+ F_VOID_FUNC blacs_gridinit_(Int *ConTxt, F_CHAR order, Int *nprow, Int *npcol)
+ #endif
+ {
++#if (INTFACE == C_CALL)
+ void Cblacs_gridmap(Int *, Int *, Int, Int, Int);
++#else
++ F_VOID_FUNC blacs_gridmap_(Int *ConTxt, Int *usermap, Int *ldup, Int *nprow0,
++ Int *npcol0);
++#endif
+ Int *tmpgrid, *iptr;
+ Int i, j;
+