2010-03-02 21:50:41 +08:00
|
|
|
|
|
|
|
|
#include <iostream>
|
|
|
|
|
|
2011-12-11 02:30:36 +08:00
|
|
|
#if (defined __GNUC__)
|
|
|
|
|
#define EIGEN_WEAK_LINKING __attribute__ ((weak))
|
|
|
|
|
#else
|
|
|
|
|
#define EIGEN_WEAK_LINKING
|
|
|
|
|
#endif
|
|
|
|
|
|
2010-03-02 21:50:41 +08:00
|
|
|
#ifdef __cplusplus
|
|
|
|
|
extern "C"
|
|
|
|
|
{
|
|
|
|
|
#endif
|
|
|
|
|
|
2011-12-11 02:30:36 +08:00
|
|
|
EIGEN_WEAK_LINKING int xerbla_(const char * msg, int *info, int)
|
2010-03-02 21:50:41 +08:00
|
|
|
{
|
|
|
|
|
std::cerr << "Eigen BLAS ERROR #" << *info << ": " << msg << "\n";
|
2010-03-03 16:32:10 +08:00
|
|
|
return 0;
|
2010-03-02 21:50:41 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef __cplusplus
|
|
|
|
|
}
|
|
|
|
|
#endif
|
