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

Added GTestSuite helper functions

Browse Source 
- Functions to convert to cblas enums from char.
- Functions to print matrix and vector elements.
- Functions to set matrix and vector elements with
  the given value.

AMD-Internal: [CPUPL-2732]
Change-Id: I1046b9578c8456e89eddba4a4e8577016b9361ca
This commit is contained in:
jagar
2023-04-11 16:30:37 +05:30
committed by Eleni Vlachopoulou
parent 6b8f4744a4
commit f164c7fe70
60 changed files with 450 additions and 751 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
gtestsuite/testinghelpers/src/level3/ref_herk.cpp
View File

@@ -48,24 +48,12 @@ void ref_herk(
T* cp, gtint_t ldc
) {
enum CBLAS_ORDER cblas_order;
if( (storage == 'c') || (storage == 'C') )
cblas_order = CblasColMajor;
else
cblas_order = CblasRowMajor;
enum CBLAS_UPLO cblas_uplo;
if( (uplo == 'u') || (uplo == 'U') )
cblas_uplo = CblasUpper;
else
cblas_uplo = CblasLower;
enum CBLAS_TRANSPOSE cblas_transa;
if( trnsa == 't' )
cblas_transa = CblasTrans;
else if( trnsa == 'c' )
cblas_transa = CblasConjTrans;
else
cblas_transa = CblasNoTrans;
char_to_cblas_order( storage, &cblas_order );
char_to_cblas_uplo( uplo, &cblas_uplo );
char_to_cblas_trans( trnsa, &cblas_transa );
typedef void (*Fptr_ref_cblas_herk)( const CBLAS_ORDER, const CBLAS_UPLO, const CBLAS_TRANSPOSE,
const f77_int, const f77_int, const RT, const T*, f77_int,