summaryrefslogtreecommitdiff
path: root/libc/dfp/test/test_isnan.c
blob: 30df45d9d2143d8869b884c5f0e43b0487b7a8f4 (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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#include <stdio.h>
#include <stdint.h>
#ifndef __STDC_WANT_DEC_FP__
# define __STDC_WANT_DEC_FP__ 1
#endif
#include <math.h>

#ifndef FUNCTION
#define FUNCTION isnan
#endif

#define FUNCTION_CALL(type)	PASTE(FUNCTION,type)
#define PASTE(x,y)	PASTE1(x,y)
#define PASTE1(x,y)	x##y

int main() {
	_Decimal32 d32;
	_Decimal64 d64;
	_Decimal128 d128;
	int inf;

	d32 = -1.20DF;
	inf = FUNCTION_CALL()(d32);
	printf("%d = isnan(%Hf)\n", inf, d32);

	d32 = NAN;
	inf = FUNCTION_CALL()(d32);
	printf("%d = isnan(%Hf)\n", inf, d32);

	d64  = -0.00DD/0.0DD;
	inf = FUNCTION_CALL()(d64);
	printf("%d = isnan(%Df)\n", inf, d64);

	d64  = NAN;
	inf = FUNCTION_CALL()(d64);
	printf("%d = isnan(%Df)\n", inf, d64);

	d128 = -1.20DL;
	inf = FUNCTION_CALL()(d128);
	printf("%d = isnan(%DDf)\n", inf, d128);

	d128 = NAN;
	inf = FUNCTION_CALL()(d128);
	printf("%d = isnan(%DDf)\n", inf, d128);
}