2010-03-02 14:50:41 +01:00
|
|
|
|
2015-02-10 19:22:05 +01:00
|
|
|
#include <stdio.h>
|
2010-03-02 14:50:41 +01:00
|
|
|
|
2025-10-13 16:25:08 +00:00
|
|
|
#include "blas.h"
|
|
|
|
|
|
2015-02-28 14:53:11 +01:00
|
|
|
#if (defined __GNUC__) && (!defined __MINGW32__) && (!defined __CYGWIN__)
|
2011-12-10 19:30:36 +01:00
|
|
|
#define EIGEN_WEAK_LINKING __attribute__((weak))
|
|
|
|
|
#else
|
|
|
|
|
#define EIGEN_WEAK_LINKING
|
|
|
|
|
#endif
|
|
|
|
|
|
2010-03-02 14:50:41 +01:00
|
|
|
#ifdef __cplusplus
|
|
|
|
|
extern "C" {
|
|
|
|
|
#endif
|
|
|
|
|
|
2024-02-14 19:51:36 +00:00
|
|
|
EIGEN_WEAK_LINKING void xerbla_(const char *msg, int *info) { printf("Eigen BLAS ERROR #%i: %s\n", *info, msg); }
|
2010-03-02 14:50:41 +01:00
|
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
|
|
|
}
|
|
|
|
|
#endif
|
