aboutsummaryrefslogtreecommitdiffstats
path: root/src/zsetu.c
blob: 538ea376aaeae281f8e7700688bdbc4508515649 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
/* See LICENSE file for copyright and license details. */
#include "internals.h"

#define SIZE_MULTIPLE(fit, in)  ((sizeof(fit) + sizeof(in) - 1) / sizeof(in))


void
zsetu(z_t a, unsigned long long int b)
{
	if (!b) {
		SET_SIGNUM(a, 0);
		return;
	}
	ENSURE_SIZE(a, SIZE_MULTIPLE(b, *(a->chars)));
	SET_SIGNUM(a, 1);
	a->chars[0] = (zahl_char_t)b;
	a->used = 1;
}