|
 |
4d572b6 |
From 5a6bba3061f19923eb9972378021e6498bf8e5ed Mon Sep 17 00:00:00 2001
|
|
|
4d572b6 |
From: Susi Lehtola <susi.lehtola@alumni.helsinki.fi>
|
|
|
4d572b6 |
Date: Tue, 11 Feb 2020 15:07:33 +1300
|
|
|
4d572b6 |
Subject: [PATCH] Patch out instances of Z15 in dynamic_zarch.c
|
|
|
4d572b6 |
|
|
|
4d572b6 |
There does not appear to be a Z15 kernel yet, causing link errors from the code. This patch fixes the issue.
|
|
|
4d572b6 |
---
|
|
|
4d572b6 |
driver/others/dynamic_zarch.c | 10 +++++-----
|
|
|
4d572b6 |
1 file changed, 5 insertions(+), 5 deletions(-)
|
|
|
4d572b6 |
|
|
|
4d572b6 |
diff --git a/driver/others/dynamic_zarch.c b/driver/others/dynamic_zarch.c
|
|
|
4d572b6 |
index 1206bf870..c7b82e4df 100644
|
|
|
4d572b6 |
--- a/driver/others/dynamic_zarch.c
|
|
|
4d572b6 |
+++ b/driver/others/dynamic_zarch.c
|
|
|
4d572b6 |
@@ -3,12 +3,12 @@
|
|
|
4d572b6 |
|
|
|
4d572b6 |
extern gotoblas_t gotoblas_Z13;
|
|
|
4d572b6 |
extern gotoblas_t gotoblas_Z14;
|
|
|
4d572b6 |
-extern gotoblas_t gotoblas_Z15;
|
|
|
4d572b6 |
+//extern gotoblas_t gotoblas_Z15;
|
|
|
4d572b6 |
//#if (!defined C_GCC) || (GCC_VERSION >= 60000)
|
|
|
4d572b6 |
//extern gotoblas_t gotoblas_Z14;
|
|
|
4d572b6 |
//#endif
|
|
|
4d572b6 |
|
|
|
4d572b6 |
-#define NUM_CORETYPES 5
|
|
|
4d572b6 |
+#define NUM_CORETYPES 4
|
|
|
4d572b6 |
|
|
|
4d572b6 |
extern void openblas_warning(int verbose, const char* msg);
|
|
|
4d572b6 |
|
|
|
4d572b6 |
@@ -16,14 +16,14 @@ static char* corename[] = {
|
|
|
4d572b6 |
"unknown",
|
|
|
4d572b6 |
"Z13",
|
|
|
4d572b6 |
"Z14",
|
|
|
4d572b6 |
- "Z15",
|
|
|
4d572b6 |
+// "Z15",
|
|
|
4d572b6 |
"ZARCH_GENERIC",
|
|
|
4d572b6 |
};
|
|
|
4d572b6 |
|
|
|
4d572b6 |
char* gotoblas_corename(void) {
|
|
|
4d572b6 |
if (gotoblas == &gotoblas_Z13) return corename[1];
|
|
|
4d572b6 |
if (gotoblas == &gotoblas_Z14) return corename[2];
|
|
|
4d572b6 |
- if (gotoblas == &gotoblas_Z15) return corename[3];
|
|
|
4d572b6 |
+// if (gotoblas == &gotoblas_Z15) return corename[3];
|
|
|
4d572b6 |
//#if (!defined C_GCC) || (GCC_VERSION >= 60000)
|
|
|
4d572b6 |
// if (gotoblas == &gotoblas_POWER9) return corename[3];
|
|
|
4d572b6 |
//#endif
|
|
|
4d572b6 |
@@ -78,7 +78,7 @@ static gotoblas_t* force_coretype(char* coretype) {
|
|
|
4d572b6 |
{
|
|
|
4d572b6 |
case 1: return (&gotoblas_Z13);
|
|
|
4d572b6 |
case 2: return (&gotoblas_Z14);
|
|
|
4d572b6 |
- case 3: return (&gotoblas_Z15);
|
|
|
4d572b6 |
+// case 3: return (&gotoblas_Z15);
|
|
|
4d572b6 |
//#if (!defined C_GCC) || (GCC_VERSION >= 60000)
|
|
|
4d572b6 |
// case 3: return (&gotoblas_POWER9);
|
|
|
4d572b6 |
//#endif
|