Merge pull request #155 from lrineau/main

fix a compilation error in src/lib/third_party/numerics/SUPERLU/
BrunoLevy · Jun 18, 2024 · f4dbb6d · f4dbb6d
2 parents 037bf2a + 3430a55
commit f4dbb6d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/lib/third_party/numerics/SUPERLU/slacon2.c b/src/lib/third_party/numerics/SUPERLU/slacon2.c
@@ -160,7 +160,7 @@ slacon2_(int *n, float *v, float *x, int *isgn, float *est, int *kase, int isave
 #ifdef _CRAY
     isave[1] = ISAMAX(n, &x[0], &c__1);   /* j */
 #else
-    isave[1] = idamax_(n, &x[0], &c__1);  /* j */
+    isave[1] = isamax_(n, &x[0], &c__1);  /* j */
 #endif
     --isave[1];  /* --j; */
     isave[2] = 2;  /* iter = 2; */