File: GB_convert_s2b_template.c

package info (click to toggle)
suitesparse 1%3A7.10.1%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 254,920 kB
  • sloc: ansic: 1,134,743; cpp: 46,133; makefile: 4,875; fortran: 2,087; java: 1,826; sh: 996; ruby: 725; python: 495; asm: 371; sed: 166; awk: 44
file content (62 lines) | stat: -rw-r--r-- 1,979 bytes parent folder | download | duplicates (2)
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
//------------------------------------------------------------------------------
// GB_convert_s2b_template: convert A from sparse to bitmap
//------------------------------------------------------------------------------

// SuiteSparse:GraphBLAS, Timothy A. Davis, (c) 2017-2025, All Rights Reserved.
// SPDX-License-Identifier: Apache-2.0

//------------------------------------------------------------------------------

// A is sparse or hypersparse.  Cx and Cb have the same type as A,
// and represent a bitmap format.

{

    //--------------------------------------------------------------------------
    // get A and Cx_new
    //--------------------------------------------------------------------------

    GB_Ap_DECLARE (Ap, const) ; GB_Ap_PTR (Ap, A) ;
    GB_Ah_DECLARE (Ah, const) ; GB_Ah_PTR (Ah, A) ;
    GB_Ai_DECLARE (Ai, const) ; GB_Ai_PTR (Ai, A) ;
    const int64_t avlen = A->vlen ;
    #ifdef GB_A_TYPE
    const GB_A_TYPE *restrict Ax = (GB_A_TYPE *) A->x ;
          GB_A_TYPE *restrict Cx = (GB_A_TYPE *) Cx_new ;
    #endif

    //--------------------------------------------------------------------------
    // convert from sparse/hyper to bitmap
    //--------------------------------------------------------------------------

    #ifdef GB_JIT_KERNEL
    {
        const int64_t *restrict kfirst_Aslice = A_ek_slicing ;
        const int64_t *restrict klast_Aslice  = A_ek_slicing + A_ntasks ;
        const int64_t *restrict pstart_Aslice = A_ek_slicing + A_ntasks * 2 ;
        #if GB_A_HAS_ZOMBIES
        {
            #include "template/GB_convert_s2b_zombies.c"
        }
        #else
        {
            #include "template/GB_convert_s2b_nozombies.c"
        }
        #endif
    }
    #else
    {
        if (nzombies > 0)
        { 
            #include "template/GB_convert_s2b_zombies.c"
        }
        else
        { 
            #include "template/GB_convert_s2b_nozombies.c"
        }
    }
    #endif
}

#undef GB_A_TYPE