1 //===------------ gttf2_test.c - Test __gttf2------------------------------===//
2 //
3 // The LLVM Compiler Infrastructure
4 //
5 // This file is dual licensed under the MIT and the University of Illinois Open
6 // Source Licenses. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file tests __gttf2 for the compiler_rt library.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include <stdio.h>
15
16 #if __LP64__ && __LDBL_MANT_DIG__ == 113
17
18 #include "fp_test.h"
19
20 int __gttf2(long double a, long double b);
21
test__gttf2(long double a,long double b,enum EXPECTED_RESULT expected)22 int test__gttf2(long double a, long double b, enum EXPECTED_RESULT expected)
23 {
24 int x = __gttf2(a, b);
25 int ret = compareResultCMP(x, expected);
26
27 if (ret){
28 printf("error in test__gttf2(%.20Lf, %.20Lf) = %d, "
29 "expected %s\n", a, b, x, expectedStr(expected));
30 }
31 return ret;
32 }
33
34 char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
35
36 #endif
37
main()38 int main()
39 {
40 #if __LP64__ && __LDBL_MANT_DIG__ == 113
41 // NaN
42 if (test__gttf2(makeQNaN128(),
43 0x1.234567890abcdef1234567890abcp+3L,
44 LESS_EQUAL_0))
45 return 1;
46 // <
47 // exp
48 if (test__gttf2(0x1.234567890abcdef1234567890abcp-3L,
49 0x1.234567890abcdef1234567890abcp+3L,
50 LESS_EQUAL_0))
51 return 1;
52 // mantissa
53 if (test__gttf2(0x1.234567890abcdef1234567890abcp+3L,
54 0x1.334567890abcdef1234567890abcp+3L,
55 LESS_EQUAL_0))
56 return 1;
57 // sign
58 if (test__gttf2(-0x1.234567890abcdef1234567890abcp+3L,
59 0x1.234567890abcdef1234567890abcp+3L,
60 LESS_EQUAL_0))
61 return 1;
62 // ==
63 if (test__gttf2(0x1.234567890abcdef1234567890abcp+3L,
64 0x1.234567890abcdef1234567890abcp+3L,
65 LESS_EQUAL_0))
66 return 1;
67 // >
68 // exp
69 if (test__gttf2(0x1.234567890abcdef1234567890abcp+3L,
70 0x1.234567890abcdef1234567890abcp-3L,
71 GREATER_0))
72 return 1;
73 // mantissa
74 if (test__gttf2(0x1.334567890abcdef1234567890abcp+3L,
75 0x1.234567890abcdef1234567890abcp+3L,
76 GREATER_0))
77 return 1;
78 // sign
79 if (test__gttf2(0x1.234567890abcdef1234567890abcp+3L,
80 -0x1.234567890abcdef1234567890abcp+3L,
81 GREATER_0))
82 return 1;
83
84 #else
85 printf("skipped\n");
86
87 #endif
88 return 0;
89 }
90