1160212Smjacob//===-- floattisf_test.c - Test __floattisf -------------------------------===// 2160212Smjacob// 3160212Smjacob// The LLVM Compiler Infrastructure 4160212Smjacob// 5160212Smjacob// This file is dual licensed under the MIT and the University of Illinois Open 6160212Smjacob// Source Licenses. See LICENSE.TXT for details. 7160212Smjacob// 8160212Smjacob//===----------------------------------------------------------------------===// 9160212Smjacob// 10160212Smjacob// This file tests __floattisf for the compiler_rt library. 11160212Smjacob// 12160212Smjacob//===----------------------------------------------------------------------===// 13160212Smjacob 14160212Smjacob#if __x86_64 15160212Smjacob 16160212Smjacob#include "int_lib.h" 17160212Smjacob#include <float.h> 18160212Smjacob#include <stdio.h> 19160212Smjacob 20160212Smjacob// Returns: convert a to a float, rounding toward even. 21160212Smjacob 22160212Smjacob// Assumption: float is a IEEE 32 bit floating point type 23160212Smjacob// ti_int is a 64 bit integral type 24160212Smjacob 25160212Smjacob// seee eeee emmm mmmm mmmm mmmm mmmm mmmm 26160212Smjacob 27160212Smjacobfloat __floattisf(ti_int a); 28160212Smjacob 29160212Smjacobint test__floattisf(ti_int a, float expected) 30160212Smjacob{ 31160212Smjacob float x = __floattisf(a); 32160212Smjacob if (x != expected) 33160212Smjacob { 34160212Smjacob twords at; 35160212Smjacob at.all = a; 36160212Smjacob printf("error in __floattisf(0x%.16llX%.16llX) = %a, expected %a\n", 37 at.s.high, at.s.low, x, expected); 38 } 39 return x != expected; 40} 41 42char assumption_1[sizeof(ti_int) == 2*sizeof(di_int)] = {0}; 43char assumption_2[sizeof(ti_int)*CHAR_BIT == 128] = {0}; 44char assumption_3[sizeof(float)*CHAR_BIT == 32] = {0}; 45 46#endif 47 48int main() 49{ 50#if __x86_64 51 if (test__floattisf(0, 0.0F)) 52 return 1; 53 54 if (test__floattisf(1, 1.0F)) 55 return 1; 56 if (test__floattisf(2, 2.0F)) 57 return 1; 58 if (test__floattisf(-1, -1.0F)) 59 return 1; 60 if (test__floattisf(-2, -2.0F)) 61 return 1; 62 63 if (test__floattisf(0x7FFFFF8000000000LL, 0x1.FFFFFEp+62F)) 64 return 1; 65 if (test__floattisf(0x7FFFFF0000000000LL, 0x1.FFFFFCp+62F)) 66 return 1; 67 68 if (test__floattisf(make_ti(0xFFFFFFFFFFFFFFFFLL, 0x8000008000000000LL), 69 -0x1.FFFFFEp+62F)) 70 return 1; 71 if (test__floattisf(make_ti(0xFFFFFFFFFFFFFFFFLL, 0x8000010000000000LL), 72 -0x1.FFFFFCp+62F)) 73 return 1; 74 75 if (test__floattisf(make_ti(0xFFFFFFFFFFFFFFFFLL, 0x8000000000000000LL), 76 -0x1.000000p+63F)) 77 return 1; 78 if (test__floattisf(make_ti(0xFFFFFFFFFFFFFFFFLL, 0x8000000000000001LL), 79 -0x1.000000p+63F)) 80 return 1; 81 82 if (test__floattisf(0x0007FB72E8000000LL, 0x1.FEDCBAp+50F)) 83 return 1; 84 85 if (test__floattisf(0x0007FB72EA000000LL, 0x1.FEDCBAp+50F)) 86 return 1; 87 if (test__floattisf(0x0007FB72EB000000LL, 0x1.FEDCBAp+50F)) 88 return 1; 89 if (test__floattisf(0x0007FB72EBFFFFFFLL, 0x1.FEDCBAp+50F)) 90 return 1; 91 if (test__floattisf(0x0007FB72EC000000LL, 0x1.FEDCBCp+50F)) 92 return 1; 93 if (test__floattisf(0x0007FB72E8000001LL, 0x1.FEDCBAp+50F)) 94 return 1; 95 96 if (test__floattisf(0x0007FB72E6000000LL, 0x1.FEDCBAp+50F)) 97 return 1; 98 if (test__floattisf(0x0007FB72E7000000LL, 0x1.FEDCBAp+50F)) 99 return 1; 100 if (test__floattisf(0x0007FB72E7FFFFFFLL, 0x1.FEDCBAp+50F)) 101 return 1; 102 if (test__floattisf(0x0007FB72E4000001LL, 0x1.FEDCBAp+50F)) 103 return 1; 104 if (test__floattisf(0x0007FB72E4000000LL, 0x1.FEDCB8p+50F)) 105 return 1; 106 107 if (test__floattisf(make_ti(0x0007FB72E8000000LL, 0), 0x1.FEDCBAp+114F)) 108 return 1; 109 110 if (test__floattisf(make_ti(0x0007FB72EA000000LL, 0), 0x1.FEDCBAp+114F)) 111 return 1; 112 if (test__floattisf(make_ti(0x0007FB72EB000000LL, 0), 0x1.FEDCBAp+114F)) 113 return 1; 114 if (test__floattisf(make_ti(0x0007FB72EBFFFFFFLL, 0), 0x1.FEDCBAp+114F)) 115 return 1; 116 if (test__floattisf(make_ti(0x0007FB72EC000000LL, 0), 0x1.FEDCBCp+114F)) 117 return 1; 118 if (test__floattisf(make_ti(0x0007FB72E8000001LL, 0), 0x1.FEDCBAp+114F)) 119 return 1; 120 121 if (test__floattisf(make_ti(0x0007FB72E6000000LL, 0), 0x1.FEDCBAp+114F)) 122 return 1; 123 if (test__floattisf(make_ti(0x0007FB72E7000000LL, 0), 0x1.FEDCBAp+114F)) 124 return 1; 125 if (test__floattisf(make_ti(0x0007FB72E7FFFFFFLL, 0), 0x1.FEDCBAp+114F)) 126 return 1; 127 if (test__floattisf(make_ti(0x0007FB72E4000001LL, 0), 0x1.FEDCBAp+114F)) 128 return 1; 129 if (test__floattisf(make_ti(0x0007FB72E4000000LL, 0), 0x1.FEDCB8p+114F)) 130 return 1; 131 132#else 133 printf("skipped\n"); 134#endif 135 return 0; 136} 137