trunctfsf2_test.c revision 1.1.1.2
1//===--------------- trunctfsf2_test.c - Test __trunctfsf2 ----------------===// 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 __trunctfsf2 for the compiler_rt library. 11// 12//===----------------------------------------------------------------------===// 13 14#include "int_lib.h" 15#include <stdio.h> 16 17#if __LDBL_MANT_DIG__ == 113 18 19#include "fp_test.h" 20 21COMPILER_RT_ABI float __trunctfsf2(long double a); 22 23int test__trunctfsf2(long double a, uint32_t expected) 24{ 25 float x = __trunctfsf2(a); 26 int ret = compareResultF(x, expected); 27 28 if (ret){ 29 printf("error in test__trunctfsf2(%.20Lf) = %f, " 30 "expected %f\n", a, x, fromRep32(expected)); 31 } 32 return ret; 33} 34 35char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0}; 36 37#endif 38 39int main() 40{ 41#if __LDBL_MANT_DIG__ == 113 42 // qNaN 43 if (test__trunctfsf2(makeQNaN128(), 44 UINT32_C(0x7fc00000))) 45 return 1; 46 // NaN 47 if (test__trunctfsf2(makeNaN128(UINT64_C(0x810000000000)), 48 UINT32_C(0x7fc08000))) 49 return 1; 50 // inf 51 if (test__trunctfsf2(makeInf128(), 52 UINT32_C(0x7f800000))) 53 return 1; 54 // zero 55 if (test__trunctfsf2(0.0L, UINT32_C(0x0))) 56 return 1; 57 58 if (test__trunctfsf2(0x1.23a2abb4a2ddee355f36789abcdep+5L, 59 UINT32_C(0x4211d156))) 60 return 1; 61 if (test__trunctfsf2(0x1.e3d3c45bd3abfd98b76a54cc321fp-9L, 62 UINT32_C(0x3b71e9e2))) 63 return 1; 64 if (test__trunctfsf2(0x1.234eebb5faa678f4488693abcdefp+4534L, 65 UINT32_C(0x7f800000))) 66 return 1; 67 if (test__trunctfsf2(0x1.edcba9bb8c76a5a43dd21f334634p-435L, 68 UINT32_C(0x0))) 69 return 1; 70 71#else 72 printf("skipped\n"); 73 74#endif 75 return 0; 76} 77