1 2#include <iostream> 3 4#if (defined __GNUC__) 5#define EIGEN_WEAK_LINKING __attribute__ ((weak)) 6#else 7#define EIGEN_WEAK_LINKING 8#endif 9 10#ifdef __cplusplus 11extern "C" 12{ 13#endif 14 15EIGEN_WEAK_LINKING int xerbla_(const char * msg, int *info, int) 16{ 17 std::cerr << "Eigen BLAS ERROR #" << *info << ": " << msg << "\n"; 18 return 0; 19} 20 21#ifdef __cplusplus 22} 23#endif 24