commit 2549b76: [Minor] Fix fortran mangling on gnu systems
Vsevolod Stakhov
vsevolod at highsecure.ru
Wed Aug 19 14:49:07 UTC 2020
Author: Vsevolod Stakhov
Date: 2020-08-19 15:46:33 +0100
URL: https://github.com/rspamd/rspamd/commit/2549b7686d660e35ad46c0eb4acf736272f862a1 (HEAD -> master)
[Minor] Fix fortran mangling on gnu systems
---
contrib/kann/kautodiff.c | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/contrib/kann/kautodiff.c b/contrib/kann/kautodiff.c
index 7b0bf8e93..c8037d353 100644
--- a/contrib/kann/kautodiff.c
+++ b/contrib/kann/kautodiff.c
@@ -900,6 +900,10 @@ void kad_vec_mul_sum(int n, float *a, const float *b, const float *c)
void kad_saxpy(int n, float a, const float *x, float *y) { kad_saxpy_inlined(n, a, x, y); }
#ifdef HAVE_CBLAS
+#ifndef __APPLE__
+/* As gfortran mangles names */
+#define ssyev ssyev_
+#endif
extern void ssyev(const char* jobz, const char* uplo, int* n, float* a, int* lda, float* w, float* work, int* lwork, int* info);
#ifdef HAVE_CBLAS_H
#include "cblas.h"
More information about the Commits
mailing list