amd/blis
1
0
Fork 0
mirror of https://github.com/amd/blis.git synced 2026-05-11 01:30:00 +00:00
Code Issues Packages Projects Releases Wiki Activity

Change integer type in CBLAS function signatures to f77_int, and add proper const-correctness to BLAS layer.

Browse Source
This commit is contained in:
Devin Matthews
2016-04-20 15:56:46 -05:00
parent ff84469a45
commit e4c54c8146
312 changed files with 2467 additions and 3570 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
frame/compat/bla_her2k.c
View File

@@ -43,15 +43,15 @@
\
void PASTEF77(ch,blasname) \
( \
f77_char* uploc, \
f77_char* transa, \
f77_int* m, \
f77_int* k, \
ftype* alpha, \
ftype* a, f77_int* lda, \
ftype* b, f77_int* ldb, \
ftype_r* beta, \
ftype* c, f77_int* ldc \
const f77_char* uploc, \
const f77_char* transa, \
const f77_int* m, \
const f77_int* k, \
const ftype* alpha, \
const ftype* a, const f77_int* lda, \
const ftype* b, const f77_int* ldb, \
const ftype_r* beta, \
ftype* c, const f77_int* ldc \
) \
{ \
uplo_t blis_uploc; \
@@ -120,11 +120,11 @@ void PASTEF77(ch,blasname) \
blis_transa, \
m0, \
k0, \
alpha, \
a, rs_a, cs_a, \
b, rs_b, cs_b, \
beta, \
c, rs_c, cs_c, \
(ftype*)alpha, \
(ftype*)a, rs_a, cs_a, \
(ftype*)b, rs_b, cs_b, \
(ftype_r*)beta, \
(ftype*)c, rs_c, cs_c, \
NULL \
); \
\