1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
function codegen_uop_template (uop, bfunc, ifunc, ufunc, ffunc, dfunc, ...
fcfunc, dcfunc)
%CODEGEN_UNOP_TEMPLATE create uop functions
%
% codegen_uop_template (uop, bfunc, ifunc, ufunc, ffunc, dfunc, ...
% fcfunc, dcfunc)
%
% uop: operator name
%
% strings defining each function, or empty if no such unary operator:
%
% bfunc: bool
% ifunc: int8, int16, int32, int64
% ufunc: uint8, uint16, uint32, uint64
% ffunc: float
% dfunc: double
% fcfunc: GxB_FC32_t
% dcfunc: GxB_FC64_t
%
% Generate functions for a unary operator, for all types.
% SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2025, All Rights Reserved.
% SPDX-License-Identifier: Apache-2.0
fprintf ('\n%-9s', uop) ;
types = {
'bool',
'int8_t',
'int16_t',
'int32_t',
'int64_t',
'uint8_t',
'uint16_t',
'uint32_t',
'uint64_t',
'float',
'double',
'GxB_FC32_t',
'GxB_FC64_t' } ;
ntypes = length (types) ;
for code1 = 1:ntypes
ctype = types {code1} ;
% determine the function
if (isequal (ctype, 'bool'))
func = bfunc ;
elseif (ctype (1) == 'i')
func = ifunc ;
elseif (ctype (1) == 'u')
func = ufunc ;
elseif (isequal (ctype, 'float'))
func = ffunc ;
elseif (isequal (ctype, 'double'))
func = dfunc ;
elseif (isequal (ctype, 'GxB_FC32_t'))
func = fcfunc ;
elseif (isequal (ctype, 'GxB_FC64_t'))
func = dcfunc ;
end
if (isempty (func))
% skip this operator
continue ;
end
codegen_uop_method (uop, func, ctype, ctype) ;
end
|
