File: GB_int64_multiply.h

package info (click to toggle)
suitesparse 1%3A7.10.1%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, 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 (34 lines) | stat: -rw-r--r-- 1,087 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
//------------------------------------------------------------------------------
// GB_int64_multiply:  multiply two integers and guard against overflow
//------------------------------------------------------------------------------

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

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

// c = a*b where c is uint64_t, and a and b are int64_t.
// Check for overflow.  Requires a >= 0 and b >= 0.

#ifndef GB_INT64_MULTIPLY_H
#define GB_INT64_MULTIPLY_H

GB_STATIC_INLINE bool GB_int64_multiply      // true if ok, false if overflow
(
    uint64_t *restrict c,   // c = a*b, or zero if overflow occurs
    const int64_t a,
    const int64_t b
)
{
    ASSERT (c != NULL) ;
    (*c) = 0 ;
    if (a == 0 || b == 0) return (true) ;
    if (a < 0 || b < 0 || a > GB_NMAX || b > GB_NMAX) return (false) ;
    uint64_t x ;
    bool ok = GB_uint64_multiply (&x, (uint64_t) a, (uint64_t) b) ;
    (*c) = ok ? x : 0 ;
    return (ok) ;
}

#endif