diff options
author | Gael Guennebaud <g.gael@free.fr> | 2010-03-03 09:32:10 +0100 |
---|---|---|
committer | Gael Guennebaud <g.gael@free.fr> | 2010-03-03 09:32:10 +0100 |
commit | f1d310195653e1d84f6b606354ea1c5babfa3d5d (patch) | |
tree | 10d05a918b5be1eccbc54696226f900adbb5c418 /blas/level1_impl.h | |
parent | 32823caa629a4f440a8a4af2c4ffb9f751d711ab (diff) |
blas: add warnings for non implemented functions
Diffstat (limited to 'blas/level1_impl.h')
-rw-r--r-- | blas/level1_impl.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/blas/level1_impl.h b/blas/level1_impl.h index 08fd0b6d6..9f3e4d166 100644 --- a/blas/level1_impl.h +++ b/blas/level1_impl.h @@ -157,6 +157,9 @@ Scalar EIGEN_BLAS_FUNC(sdot)(int *n, RealScalar *px, int *incx, RealScalar *py, // computes a dot product of a conjugated vector with another vector. void EIGEN_BLAS_FUNC(dotc)(RealScalar* dot, int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) { + + std::cerr << "Eigen BLAS: _dotc is not implemented yet\n"; + return; // TODO: find how to return a complex to fortran @@ -175,6 +178,8 @@ void EIGEN_BLAS_FUNC(dotc)(RealScalar* dot, int *n, RealScalar *px, int *incx, R // computes a vector-vector dot product without complex conjugation. void EIGEN_BLAS_FUNC(dotu)(RealScalar* dot, int *n, RealScalar *px, int *incx, RealScalar *py, int *incy) { + std::cerr << "Eigen BLAS: _dotu is not implemented yet\n"; + return; // TODO: find how to return a complex to fortran |