diff options
| author | Pjotr Prins | 2017-10-14 06:16:54 +0000 |
|---|---|---|
| committer | Pjotr Prins | 2017-10-14 06:16:54 +0000 |
| commit | 0e2f1e6214079f68a6e46dadd22d806f89d058ff (patch) | |
| tree | 92b8a8547cf28daf26af84dfdde869d99e632669 | |
| parent | a2e871270538bb187865c9f00d8aa8f4e817e131 (diff) | |
| download | pangemma-0e2f1e6214079f68a6e46dadd22d806f89d058ff.tar.gz | |
Older openblas does not like blasint
| -rw-r--r-- | src/fastblas.cpp | 12 | ||||
| -rw-r--r-- | src/fastopenblas.h | 14 |
2 files changed, 12 insertions, 14 deletions
diff --git a/src/fastblas.cpp b/src/fastblas.cpp index 3fe712c..94640a5 100644 --- a/src/fastblas.cpp +++ b/src/fastblas.cpp @@ -65,17 +65,17 @@ gsl_matrix *fast_copy(gsl_matrix *m, const double *mem) { void fast_cblas_dgemm(const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE TransA, const enum CBLAS_TRANSPOSE TransB, - const blasint M, - const blasint N, - const blasint K, + const size_t M, + const size_t N, + const size_t K, const double alpha, const double *A, - const blasint lda, + const size_t lda, const double *B, - const blasint ldb, + const size_t ldb, const double beta, double *C, - const blasint ldc) { + const size_t ldc) { #ifndef NDEBUG size_t i,j; if (is_debug_mode()) { diff --git a/src/fastopenblas.h b/src/fastopenblas.h index 86054a0..826fe6e 100644 --- a/src/fastopenblas.h +++ b/src/fastopenblas.h @@ -6,19 +6,17 @@ #include <cblas.h> // For OpenBlas #include "gsl/gsl_matrix.h" -typedef long blasint; - void fast_cblas_dgemm(const enum CBLAS_ORDER Order, const enum CBLAS_TRANSPOSE TransA, const enum CBLAS_TRANSPOSE TransB, - const blasint M, - const blasint N, - const blasint K, + const size_t M, + const size_t N, + const size_t K, const double alpha, const double *A, - const blasint lda, + const size_t lda, const double *B, - const blasint ldb, + const size_t ldb, const double beta, double *C, - const blasint ldc); + const size_t ldc); |