blob: 78b78bbf1b573af008933d092dc6c6ceb19c745f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
/* See LICENSE file for copyright and license details. */
#include "internals"
#define CHARS_PER_TYPE(t) (sizeof(t) / (BITS_PER_CHAR >> 3))
void
zsetu(z_t a, unsigned long long int b)
{
if (!b) {
SET_SIGNUM(a, 0);
return;
}
if (a->alloced < CHARS_PER_TYPE(b)) {
a->alloced = CHARS_PER_TYPE(b);
a->chars = realloc(a->chars, CHARS_PER_TYPE(b) * sizeof(*(a->chars)))
}
SET_SIGNUM(a, 1);
a->used = 0;
while (b) {
a->chars[a->used++] = (uint32_t)b;
b >>= BITS_PER_CHAR;
}
}
|
