1 //------------------------------------------------------------------------------
2 // GB_mex_binaryop: parse a binaryop, for testing
3 //------------------------------------------------------------------------------
4
5 // SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2021, All Rights Reserved.
6 // SPDX-License-Identifier: Apache-2.0
7
8 //------------------------------------------------------------------------------
9
10 #include "GB_mex.h"
11
12 #define USAGE "GB_mex_binaryop (binaryop_struct))"
13
mexFunction(int nargout,mxArray * pargout[],int nargin,const mxArray * pargin[])14 void mexFunction
15 (
16 int nargout,
17 mxArray *pargout [ ],
18 int nargin,
19 const mxArray *pargin [ ]
20 )
21 {
22
23 // check inputs
24 GB_CONTEXT (USAGE) ;
25 if (nargin != 1)
26 {
27 mexErrMsgTxt ("Usage: " USAGE) ;
28 }
29
30 GrB_BinaryOp binaryop = NULL ;
31 GB_mx_mxArray_to_BinaryOp (&binaryop, pargin [0], "binaryop",
32 GrB_FP64, false) ;
33
34 GrB_Info info = GB_BinaryOp_check (binaryop, "binaryop", GxB_COMPLETE,
35 stdout) ;
36 if (info != GrB_SUCCESS)
37 {
38 mexErrMsgTxt ("binaryop failed") ;
39 }
40 }
41
42