From: Vsevolod Stakhov <vsevolod@highsecure.ru>
Date: Wed, 19 Aug 2020 14:46:33 +0000 (+0100)
Subject: [Minor] Fix fortran mangling on gnu systems
X-Git-Tag: 2.6~141
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=2549b7686d660e35ad46c0eb4acf736272f862a1;p=thirdparty%2Frspamd.git

[Minor] Fix fortran mangling on gnu systems
---

diff --git a/contrib/kann/kautodiff.c b/contrib/kann/kautodiff.c
index 7b0bf8e93c..c8037d3535 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"