1//===------------ unordtf2_test.c - Test __unordtf2------------------------===//
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 __unordtf2 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
20int __unordtf2(long double a, long double b);
21
22int test__unordtf2(long double a, long double b, enum EXPECTED_RESULT expected)
23{
24    int x = __unordtf2(a, b);
25    int ret = compareResultCMP(x, expected);
26
27    if (ret){
28        printf("error in test__unordtf2(%.20Lf, %.20Lf) = %d, "
29               "expected %s\n", a, b, x, expectedStr(expected));
30    }
31    return ret;
32}
33
34char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
35
36#endif
37
38int main()
39{
40#if __LP64__ && __LDBL_MANT_DIG__ == 113
41    // NaN
42    if (test__unordtf2(makeQNaN128(),
43                       0x1.234567890abcdef1234567890abcp+3L,
44                       NEQUAL_0))
45        return 1;
46    // other
47    if (test__unordtf2(0x1.234567890abcdef1234567890abcp+3L,
48                       0x1.334567890abcdef1234567890abcp+3L,
49                       EQUAL_0))
50        return 1;
51    if (test__unordtf2(0x1.234567890abcdef1234567890abcp+3L,
52                       0x1.234567890abcdef1234567890abcp+3L,
53                       EQUAL_0))
54        return 1;
55    if (test__unordtf2(0x1.234567890abcdef1234567890abcp+3L,
56                       0x1.234567890abcdef1234567890abcp-3L,
57                       EQUAL_0))
58        return 1;
59
60#else
61    printf("skipped\n");
62
63#endif
64    return 0;
65}
66