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
63
64
65
66
67
68
69
|
/* $OpenBSD: rint.c,v 1.10 2011/04/10 17:06:44 martynas Exp $ */
/* Written by Michael Shalayeff, 2003, Public domain. */
#include <assert.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <signal.h>
#include <unistd.h>
#include <math.h>
#include <ieeefp.h>
static void
sigfpe(int sig, siginfo_t *si, void *v)
{
char buf[132];
if (si) {
snprintf(buf, sizeof(buf), "sigfpe: addr=%p, code=%d\n",
si->si_addr, si->si_code);
write(1, buf, strlen(buf));
}
_exit(1);
}
int
main(int argc, char *argv[])
{
struct sigaction sa;
memset(&sa, 0, sizeof(sa));
sa.sa_sigaction = sigfpe;
sa.sa_flags = SA_SIGINFO;
sigaction(SIGFPE, &sa, NULL);
assert(rint(8.6) == 9.);
assert(rintf(8.6F) == 9);
assert(rintl(8.6L) == 9);
assert(lrint(8.6) == 9L);
assert(lrintf(8.6F) == 9L);
assert(llrint(8.6) == 9LL);
assert(llrintf(8.6F) == 9LL);
assert(lrint(0.0) == 0L);
assert(lrintf(0.0) == 0L);
assert(lrint(-0.0) == 0L);
assert(lrintf(-0.0) == 0L);
assert(llrint(4503599627370496.0) == 4503599627370496LL);
assert(llrintf(4503599627370496.0F) == 4503599627370496LL);
assert(llrint(-4503599627370496.0) == -4503599627370496LL);
assert(llrintf(-4503599627370496.0F) == -4503599627370496LL);
assert(llrint(0x7ffffffffffffc00.0p0) == 0x7ffffffffffffc00LL);
assert(llrintf(0x7fffff8000000000.0p0F) == 0x7fffff8000000000LL);
assert(llrint(-0x8000000000000000.0p0) == -0x8000000000000000LL);
assert(llrintf(-0x8000000000000000.0p0F) == -0x8000000000000000LL);
fpsetround(FP_RM);
assert(lrint(-0.1) == -1L);
assert(lrintf(-0.1) == -1L);
fpsetround(FP_RP);
assert(lrint(0.1) == 1L);
assert(lrintf(0.1) == 1L);
exit(0);
}
|
