diff options
| author |  Gael Guennebaud <g.gael@free.fr> | 2011-02-18 15:11:31 +0100 |
|---|---|---|
| committer | Gael Guennebaud <g.gael@free.fr> | 2011-02-18 15:11:31 +0100 |
| commit | f7cd63b964b272fecf8d3411393f60803432fc70 (patch) | |
| tree | 44eb7b949b29c174aa168b1f55b1f355076c79e2 /bench/btl | |
| parent | 69cecc45e59acbc4d050b9bfc84179f57e6a3ee2 (diff) | |
fix bug #189 (issue with fortran concentions to return COMPLEX values)
Diffstat (limited to 'bench/btl')
| -rw-r--r-- | bench/btl/libs/C_BLAS/blas.h | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/bench/btl/libs/C_BLAS/blas.h b/bench/btl/libs/C_BLAS/blas.h index ab3d44052..28f3a4e57 100644 --- a/bench/btl/libs/C_BLAS/blas.h +++ b/bench/btl/libs/C_BLAS/blas.h @@ -46,6 +46,11 @@ double BLASFUNC(xdotu) (int *, double *, int *, double *, int *); double BLASFUNC(xdotc) (int *, double *, int *, double *, int *); #endif +int BLASFUNC(cdotuw) (int *, float *, int *, float *, int *, float*); +int BLASFUNC(cdotcw) (int *, float *, int *, float *, int *, float*); +int BLASFUNC(zdotuw) (int *, double *, int *, double *, int *, double*); +int BLASFUNC(zdotcw) (int *, double *, int *, double *, int *, double*); + int BLASFUNC(saxpy) (int *, float *, float *, int *, float *, int *); int BLASFUNC(daxpy) (int *, double *, double *, int *, double *, int *); int BLASFUNC(qaxpy) (int *, double *, double *, int *, double *, int *); |