ronnie
2022-10-14 1504bb53e29d3d46222c0b3ea994fc494b48e153
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
#include <stdio.h>
 
#if (defined __GNUC__) && (!defined __MINGW32__) && (!defined __CYGWIN__)
#define EIGEN_WEAK_LINKING __attribute__ ((weak))
#else
#define EIGEN_WEAK_LINKING
#endif
 
#ifdef __cplusplus
extern "C"
{
#endif
 
EIGEN_WEAK_LINKING int xerbla_(const char * msg, int *info, int)
{
  printf("Eigen BLAS ERROR #%i: %s\n", *info, msg );
  return 0;
}
 
#ifdef __cplusplus
}
#endif