eigen/blas/xerbla.cpp
2010-03-03 09:32:10 +01:00

18 lines
216 B
C++

#include <iostream>
#ifdef __cplusplus
extern "C"
{
#endif
int xerbla_(char * msg, int *info, int)
{
std::cerr << "Eigen BLAS ERROR #" << *info << ": " << msg << "\n";
return 0;
}
#ifdef __cplusplus
}
#endif