libflame
revision_anchor
|
Functions | |
FLA_Error | FLA_Bidiag_UT_internal_check (FLA_Obj A, FLA_Obj TU, FLA_Obj TV, fla_bidiagut_t *cntl) |
FLA_Error FLA_Bidiag_UT_internal_check | ( | FLA_Obj | A, |
FLA_Obj | TU, | ||
FLA_Obj | TV, | ||
fla_bidiagut_t * | cntl | ||
) |
References FLA_Check_identical_object_elemtype(), and FLA_Check_null_pointer().
Referenced by FLA_Bidiag_UT_internal().
{ FLA_Error e_val; // Abort if the control structure is NULL. e_val = FLA_Check_null_pointer( ( void* ) cntl ); FLA_Check_error_code( e_val ); // Verify that the object element types are identical. e_val = FLA_Check_identical_object_elemtype( A, TU ); FLA_Check_error_code( e_val ); e_val = FLA_Check_identical_object_elemtype( A, TV ); FLA_Check_error_code( e_val ); return FLA_SUCCESS; }