1 /*
2 
3     Copyright (C) 2014, The University of Texas at Austin
4 
5     This file is part of libflame and is available under the 3-Clause
6     BSD license, which can be found in the LICENSE file at the top-level
7     directory, or at http://opensource.org/licenses/BSD-3-Clause
8 
9 */
10 
11 #include "FLAME.h"
12 
FLA_Obj_create_buffer_check(dim_t rs,dim_t cs,FLA_Obj * obj)13 FLA_Error FLA_Obj_create_buffer_check( dim_t rs, dim_t cs, FLA_Obj *obj )
14 {
15   FLA_Error e_val;
16 
17   e_val = FLA_Check_null_pointer( obj );
18   FLA_Check_error_code( e_val );
19 
20   e_val = FLA_Check_matrix_strides( FLA_Obj_length( *obj ), FLA_Obj_width( *obj ), rs, cs );
21   FLA_Check_error_code( e_val );
22 
23   return FLA_SUCCESS;
24 }
25 
26