Skip to content

Alias *gemmt_ as *gemmtr_ to fix lapack 3.12.1 compatibility. (Closes: #848) #849

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
devinamatthews merged 3 commits into from
Feb 5, 2025
Merged

Alias *gemmt_ as *gemmtr_ to fix lapack 3.12.1 compatibility. (Closes: #848) #849

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
2e20642
Alias *gemmt_ as *gemmtr_ to fix lapack 3.12.1 compatibility. (Closes…
cdluminate Jan 28, 2025
32acbb9
Add the ?gemmtr_ and cblas_?gemmtr aliases to symbol list.
cdluminate Feb 1, 2025
0e9a2ff
Also alias cblas_?gemmt as cblas_?gemmtr for lapack 3.12.1 compatibil…
cdluminate Feb 1, 2025
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 8 additions & 0 deletions build/libblis-symbols.def
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -1248,6 +1248,7 @@ cblas_cgemm
cblas_cgemm3m
cblas_cgemm_batch
cblas_cgemmt
cblas_cgemmtr
cblas_cgemv
cblas_cgerc
cblas_cgeru
Expand Down Expand Up @@ -1284,6 +1285,7 @@ cblas_dgbmv
cblas_dgemm
cblas_dgemm_batch
cblas_dgemmt
cblas_dgemmtr
cblas_dgemv
cblas_dger
cblas_dnrm2
Expand Down Expand Up @@ -1330,6 +1332,7 @@ cblas_sgbmv
cblas_sgemm
cblas_sgemm_batch
cblas_sgemmt
cblas_sgemmtr
cblas_sgemv
cblas_sger
cblas_snrm2
Expand Down Expand Up @@ -1369,6 +1372,7 @@ cblas_zgemm
cblas_zgemm3m
cblas_zgemm_batch
cblas_zgemmt
cblas_zgemmtr
cblas_zgemv
cblas_zgerc
cblas_zgeru
Expand Down Expand Up @@ -1405,6 +1409,7 @@ cgemm3m_
cgemm_
cgemm_batch_
cgemmt_
cgemmtr_
cgemv_
cgerc_
cgeru_
Expand Down Expand Up @@ -1446,6 +1451,7 @@ dgbmv_
dgemm_
dgemm_batch_
dgemmt_
dgemmtr_
dgemv_
dger_
dnrm2_
Expand Down Expand Up @@ -1507,6 +1513,7 @@ sgbmv_
sgemm_
sgemm_batch_
sgemmt_
sgemmtr_
sgemv_
sger_
snrm2_
Expand Down Expand Up @@ -1551,6 +1558,7 @@ zgemm3m_
zgemm_
zgemm_batch_
zgemmt_
zgemmtr_
zgemv_
zgerc_
zgeru_
Expand Down
4 changes: 4 additions & 0 deletions frame/compat/cblas/src/cblas.h
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -608,21 +608,25 @@ void BLIS_EXPORT_BLAS cblas_sgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
f77_int N, f77_int K, float alpha, const float *A,
f77_int lda, const float *B, f77_int ldb,
float beta, float *C, f77_int ldc);
void BLIS_EXPORT_BLAS cblas_sgemmtr(); // alias to cblas_sgemmt
void BLIS_EXPORT_BLAS cblas_dgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
enum CBLAS_TRANSPOSE TransA, enum CBLAS_TRANSPOSE TransB,
f77_int N, f77_int K, double alpha, const double *A,
f77_int lda, const double *B, f77_int ldb,
double beta, double *C, f77_int ldc);
void BLIS_EXPORT_BLAS cblas_dgemmtr(); // alias to cblas_dgemmt
void BLIS_EXPORT_BLAS cblas_cgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
enum CBLAS_TRANSPOSE TransA, enum CBLAS_TRANSPOSE TransB,
f77_int N, f77_int K, const void *alpha, const void *A,
f77_int lda, const void *B, f77_int ldb,
const void *beta, void *C, f77_int ldc);
void BLIS_EXPORT_BLAS cblas_cgemmtr(); // alias to cblas_cgemmt
void BLIS_EXPORT_BLAS cblas_zgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
enum CBLAS_TRANSPOSE TransA, enum CBLAS_TRANSPOSE TransB,
f77_int N, f77_int K, const void *alpha, const void *A,
f77_int lda, const void *B, f77_int ldb,
const void *beta, void *C, f77_int ldc);
void BLIS_EXPORT_BLAS cblas_zgemmtr(); // alias to cblas_zgemmt

// -- Batch APIs --

Expand Down
2 changes: 2 additions & 0 deletions frame/compat/cblas/src/extra/cblas_cgemmt.c
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -163,4 +163,6 @@ void cblas_cgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
RowMajorStrg = 0;
return;
}

void cblas_cgemmtr() __attribute__((alias("cblas_cgemmt")));
#endif
2 changes: 2 additions & 0 deletions frame/compat/cblas/src/extra/cblas_dgemmt.c
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -163,4 +163,6 @@ void cblas_dgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
RowMajorStrg = 0;
return;
}

void cblas_dgemmtr() __attribute__((alias("cblas_dgemmt")));
#endif
2 changes: 2 additions & 0 deletions frame/compat/cblas/src/extra/cblas_sgemmt.c
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -163,4 +163,6 @@ void cblas_sgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
RowMajorStrg = 0;
return;
}

void cblas_sgemmtr() __attribute__((alias("cblas_sgemmt")));
#endif
2 changes: 2 additions & 0 deletions frame/compat/cblas/src/extra/cblas_zgemmt.c
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -163,4 +163,6 @@ void cblas_zgemmt(enum CBLAS_ORDER Order, enum CBLAS_UPLO Uplo,
RowMajorStrg = 0;
return;
}

void cblas_zgemmtr() __attribute__((alias("cblas_zgemmt")));
#endif
10 changes: 8 additions & 2 deletions frame/compat/extra/bla_gemmt.c
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -39,6 +39,8 @@
//
// Define BLAS-to-BLIS interfaces.
//
#define STRINGIFY( name ) #name
#define EXPAND_AND_STRINGIFY( name ) STRINGIFY( name )

#ifdef BLIS_BLAS3_CALLS_TAPI

Expand Down Expand Up @@ -118,7 +120,9 @@ void PASTEF77(ch,blasname) \
\
/* Finalize BLIS. */ \
bli_finalize_auto(); \
}
}; \
void PASTEF77 (ch, blasname ## r )() \
__attribute__ ((alias(EXPAND_AND_STRINGIFY(PASTEF77(ch,blasname)))));

#else

Expand Down Expand Up @@ -221,7 +225,9 @@ void PASTEF77(ch,blasname) \
\
/* Finalize BLIS. */ \
bli_finalize_auto(); \
}
}; \
void PASTEF77 (ch, blasname ## r )() \
__attribute__ ((alias(EXPAND_AND_STRINGIFY(PASTEF77(ch,blasname)))));

#endif

Expand Down
1 change: 1 addition & 0 deletions frame/compat/extra/bla_gemmt.h
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -56,5 +56,6 @@ BLIS_EXPORT_BLAS void PASTEF77(ch,blasname) \

#ifdef BLIS_ENABLE_BLAS
INSERT_GENTPROT_BLAS( gemmt )
INSERT_GENTPROT_BLAS( gemmtr )
#endif