void bli_datatype_union_check( num_t dt1, num_t dt2 ) { err_t e_val; e_val = bli_check_floating_datatype( dt1 ); bli_check_error_code( e_val ); e_val = bli_check_floating_datatype( dt2 ); bli_check_error_code( e_val ); }
err_t bli_check_floating_object( obj_t* a ) { err_t e_val; num_t dt; dt = bli_obj_datatype( *a ); e_val = bli_check_floating_datatype( dt ); return e_val; }