1*4684ddb6SLionel Sambuc //===-- absvti2_test.c - Test __absvti2 -----------------------------------===//
2*4684ddb6SLionel Sambuc //
3*4684ddb6SLionel Sambuc // The LLVM Compiler Infrastructure
4*4684ddb6SLionel Sambuc //
5*4684ddb6SLionel Sambuc // This file is dual licensed under the MIT and the University of Illinois Open
6*4684ddb6SLionel Sambuc // Source Licenses. See LICENSE.TXT for details.
7*4684ddb6SLionel Sambuc //
8*4684ddb6SLionel Sambuc //===----------------------------------------------------------------------===//
9*4684ddb6SLionel Sambuc //
10*4684ddb6SLionel Sambuc // This file tests __absvti2 for the compiler_rt library.
11*4684ddb6SLionel Sambuc //
12*4684ddb6SLionel Sambuc //===----------------------------------------------------------------------===//
13*4684ddb6SLionel Sambuc
14*4684ddb6SLionel Sambuc #if __x86_64
15*4684ddb6SLionel Sambuc
16*4684ddb6SLionel Sambuc #include "int_lib.h"
17*4684ddb6SLionel Sambuc #include <stdio.h>
18*4684ddb6SLionel Sambuc #include <stdlib.h>
19*4684ddb6SLionel Sambuc
20*4684ddb6SLionel Sambuc // Returns: absolute value
21*4684ddb6SLionel Sambuc
22*4684ddb6SLionel Sambuc // Effects: aborts if abs(x) < 0
23*4684ddb6SLionel Sambuc
24*4684ddb6SLionel Sambuc ti_int __absvti2(ti_int a);
25*4684ddb6SLionel Sambuc
test__absvti2(ti_int a)26*4684ddb6SLionel Sambuc int test__absvti2(ti_int a)
27*4684ddb6SLionel Sambuc {
28*4684ddb6SLionel Sambuc ti_int x = __absvti2(a);
29*4684ddb6SLionel Sambuc ti_int expected = a;
30*4684ddb6SLionel Sambuc if (expected < 0)
31*4684ddb6SLionel Sambuc expected = -expected;
32*4684ddb6SLionel Sambuc if (x != expected || expected < 0)
33*4684ddb6SLionel Sambuc {
34*4684ddb6SLionel Sambuc twords at;
35*4684ddb6SLionel Sambuc at.all = a;
36*4684ddb6SLionel Sambuc twords xt;
37*4684ddb6SLionel Sambuc xt.all = x;
38*4684ddb6SLionel Sambuc twords expectedt;
39*4684ddb6SLionel Sambuc expectedt.all = expected;
40*4684ddb6SLionel Sambuc printf("error in __absvti2(0x%llX%.16llX) = "
41*4684ddb6SLionel Sambuc "0x%llX%.16llX, expected positive 0x%llX%.16llX\n",
42*4684ddb6SLionel Sambuc at.s.high, at.s.low, xt.s.high, xt.s.low,
43*4684ddb6SLionel Sambuc expectedt.s.high, expectedt.s.low);
44*4684ddb6SLionel Sambuc }
45*4684ddb6SLionel Sambuc return x != expected;
46*4684ddb6SLionel Sambuc }
47*4684ddb6SLionel Sambuc
48*4684ddb6SLionel Sambuc #endif
49*4684ddb6SLionel Sambuc
main()50*4684ddb6SLionel Sambuc int main()
51*4684ddb6SLionel Sambuc {
52*4684ddb6SLionel Sambuc #if __x86_64
53*4684ddb6SLionel Sambuc
54*4684ddb6SLionel Sambuc // if (test__absvti2(make_ti(0x8000000000000000LL, 0))) // should abort
55*4684ddb6SLionel Sambuc // return 1;
56*4684ddb6SLionel Sambuc if (test__absvti2(0x0000000000000000LL))
57*4684ddb6SLionel Sambuc return 1;
58*4684ddb6SLionel Sambuc if (test__absvti2(0x0000000000000001LL))
59*4684ddb6SLionel Sambuc return 1;
60*4684ddb6SLionel Sambuc if (test__absvti2(0x0000000000000002LL))
61*4684ddb6SLionel Sambuc return 1;
62*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFELL)))
63*4684ddb6SLionel Sambuc return 1;
64*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
65*4684ddb6SLionel Sambuc return 1;
66*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0x8000000000000000LL, 0x0000000000000001LL)))
67*4684ddb6SLionel Sambuc return 1;
68*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0x8000000000000000LL, 0x0000000000000002LL)))
69*4684ddb6SLionel Sambuc return 1;
70*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0xFFFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFELL)))
71*4684ddb6SLionel Sambuc return 1;
72*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(0xFFFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
73*4684ddb6SLionel Sambuc return 1;
74*4684ddb6SLionel Sambuc
75*4684ddb6SLionel Sambuc int i;
76*4684ddb6SLionel Sambuc for (i = 0; i < 10000; ++i)
77*4684ddb6SLionel Sambuc if (test__absvti2(make_ti(((ti_int)rand() << 32) | rand(),
78*4684ddb6SLionel Sambuc ((ti_int)rand() << 32) | rand())))
79*4684ddb6SLionel Sambuc return 1;
80*4684ddb6SLionel Sambuc #else
81*4684ddb6SLionel Sambuc printf("skipped\n");
82*4684ddb6SLionel Sambuc #endif
83*4684ddb6SLionel Sambuc return 0;
84*4684ddb6SLionel Sambuc }
85