diff --git a/frame/1m/packm/bli_packm_init.c b/frame/1m/packm/bli_packm_init.c index 47fdd8b66..c217a34ee 100644 --- a/frame/1m/packm/bli_packm_init.c +++ b/frame/1m/packm/bli_packm_init.c @@ -166,7 +166,7 @@ void bli_packm_init_pack( bool_t densify, obj_t* p ) { num_t datatype = bli_obj_datatype( *c ); - trans_t transc = bli_obj_trans_status( *c ); + trans_t transc = bli_obj_onlytrans_status( *c ); dim_t m_c = bli_obj_length( *c ); dim_t n_c = bli_obj_width( *c ); dim_t mr_def_dim = bli_blksz_for_type( datatype, mr ); diff --git a/frame/1m/unpackm/bli_unpackm_blk_var1.c b/frame/1m/unpackm/bli_unpackm_blk_var1.c index f597eb2ad..ca1882445 100644 --- a/frame/1m/unpackm/bli_unpackm_blk_var1.c +++ b/frame/1m/unpackm/bli_unpackm_blk_var1.c @@ -74,7 +74,7 @@ void bli_unpackm_blk_var1( obj_t* p, // the trans status (not the conjugation status), since we probably // don't want to un-conjugate if the original matrix was conjugated // when packed. - trans_t transc = bli_obj_trans_status( *c ); + trans_t transc = bli_obj_onlytrans_status( *c ); dim_t m_c = bli_obj_length( *c ); dim_t n_c = bli_obj_width( *c ); diff --git a/frame/1m/unpackm/bli_unpackm_blk_var2.c b/frame/1m/unpackm/bli_unpackm_blk_var2.c index f9419b323..6311b52f8 100644 --- a/frame/1m/unpackm/bli_unpackm_blk_var2.c +++ b/frame/1m/unpackm/bli_unpackm_blk_var2.c @@ -74,7 +74,7 @@ void bli_unpackm_blk_var2( obj_t* p, // the trans status (not the conjugation status), since we probably // don't want to un-conjugate if the original matrix was conjugated // when packed. - trans_t transc = bli_obj_trans_status( *c ); + trans_t transc = bli_obj_onlytrans_status( *c ); dim_t m_c = bli_obj_length( *c ); dim_t n_c = bli_obj_width( *c ); diff --git a/frame/1m/unpackm/bli_unpackm_unb_var1.c b/frame/1m/unpackm/bli_unpackm_unb_var1.c index 6f7ce088d..712cec7be 100644 --- a/frame/1m/unpackm/bli_unpackm_unb_var1.c +++ b/frame/1m/unpackm/bli_unpackm_unb_var1.c @@ -57,7 +57,7 @@ void bli_unpackm_unb_var1( obj_t* p, doff_t diagoffp = bli_obj_diag_offset( *p ); uplo_t uplop = bli_obj_uplo( *p ); - trans_t transc = bli_obj_trans_status( *c ); + trans_t transc = bli_obj_onlytrans_status( *c ); dim_t m_c = bli_obj_length( *c ); dim_t n_c = bli_obj_width( *c ); diff --git a/frame/include/bli_obj_macro_defs.h b/frame/include/bli_obj_macro_defs.h index 9dcd85086..4b002ce0b 100644 --- a/frame/include/bli_obj_macro_defs.h +++ b/frame/include/bli_obj_macro_defs.h @@ -108,7 +108,7 @@ \ ( (obj).info & BLIS_CONJTRANS_BITS ) -#define bli_obj_trans_status( obj ) \ +#define bli_obj_onlytrans_status( obj ) \ \ ( (obj).info & BLIS_TRANS_BIT )