blob: 0c8db59ae15d1010b8d25a9be9077f09c33c4f73 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
/*
* Copyright 2008-2009 Katholieke Universiteit Leuven
*
* Use of this software is governed by the GNU LGPLv2.1 license
*
* Written by Sven Verdoolaege, K.U.Leuven, Departement
* Computerwetenschappen, Celestijnenlaan 200A, B-3001 Leuven, Belgium
*/
#include <isl/int.h>
uint32_t isl_gmp_hash(mpz_t v, uint32_t hash)
{
int sa = v[0]._mp_size;
int abs_sa = sa < 0 ? -sa : sa;
unsigned char *data = (unsigned char *)v[0]._mp_d;
unsigned char *end = data + abs_sa * sizeof(v[0]._mp_d[0]);
if (sa < 0)
isl_hash_byte(hash, 0xFF);
for (; data < end; ++data)
isl_hash_byte(hash, *data);
return hash;
}
|
