diff options
| author | Pauli Virtanen <pav@iki.fi> | 2019-12-07 14:40:48 +0200 |
|---|---|---|
| committer | Pauli Virtanen <pav@iki.fi> | 2019-12-14 14:14:37 +0200 |
| commit | 669cd13c692cfe8476e24dad3d42bbbd94547727 (patch) | |
| tree | c16e68e20ff92c8389c446c4e96eb6d39e8a164e /numpy/linalg/umath_linalg.c.src | |
| parent | a92039db1edf9d85059ddadc10134f434ae82ce7 (diff) | |
| download | numpy-669cd13c692cfe8476e24dad3d42bbbd94547727.tar.gz | |
ENH: update BLAS symbol suffix/prefix handling in cblasfuncs & linalg
Revise the BLAS name mangling to support the general scheme.
Diffstat (limited to 'numpy/linalg/umath_linalg.c.src')
| -rw-r--r-- | numpy/linalg/umath_linalg.c.src | 20 |
1 files changed, 4 insertions, 16 deletions
diff --git a/numpy/linalg/umath_linalg.c.src b/numpy/linalg/umath_linalg.c.src index b111f75d5..e864c541b 100644 --- a/numpy/linalg/umath_linalg.c.src +++ b/numpy/linalg/umath_linalg.c.src @@ -15,6 +15,8 @@ #include "npy_config.h" +#include "npy_cblas.h" + #include <stddef.h> #include <stdio.h> #include <assert.h> @@ -62,23 +64,9 @@ dbg_stack_trace() ***************************************************************************** */ -#ifndef NPY_UMATH_USE_BLAS64_ - -#ifdef NO_APPEND_FORTRAN -# define FNAME(x) x -#else -# define FNAME(x) x##_ -#endif - -typedef int fortran_int; +#define FNAME(x) BLAS_FUNC(x) -#else - -#define FNAME(x) x##_64_ - -typedef npy_int64 fortran_int; - -#endif +typedef CBLAS_INT fortran_int; typedef struct { float r, i; } f2c_complex; typedef struct { double r, i; } f2c_doublecomplex; |