ashlti3_test.c revision 1.1.1.2
1//===-- ashlti3_test.c - Test __ashlti3 -----------------------------------===// 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 __ashlti3 for the compiler_rt library. 11// 12//===----------------------------------------------------------------------===// 13 14#include "int_lib.h" 15#include <stdio.h> 16 17#ifdef CRT_HAS_128BIT 18 19// Returns: a << b 20 21// Precondition: 0 <= b < bits_in_tword 22 23ti_int __ashlti3(ti_int a, si_int b); 24 25int test__ashlti3(ti_int a, si_int b, ti_int expected) 26{ 27 ti_int x = __ashlti3(a, b); 28 if (x != expected) 29 { 30 twords at; 31 at.all = a; 32 twords bt; 33 bt.all = b; 34 twords xt; 35 xt.all = x; 36 twords expectedt; 37 expectedt.all = expected; 38 printf("error in __ashlti3: 0x%llX%.16llX << %d = 0x%llX%.16llX," 39 " expected 0x%llX%.16llX\n", 40 at.s.high, at.s.low, b, xt.s.high, xt.s.low, 41 expectedt.s.high, expectedt.s.low); 42 } 43 return x != expected; 44} 45 46char assumption_1[sizeof(ti_int) == 2*sizeof(di_int)] = {0}; 47 48#endif 49 50int main() 51{ 52#ifdef CRT_HAS_128BIT 53 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 0, 54 make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL))) 55 return 1; 56 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 1, 57 make_ti(0xFDB97530ECA8642BLL, 0xFDB97530ECA8642ALL))) 58 return 1; 59 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 2, 60 make_ti(0xFB72EA61D950C857LL, 0XFB72EA61D950C854LL))) 61 return 1; 62 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 3, 63 make_ti(0xF6E5D4C3B2A190AFLL, 0xF6E5D4C3B2A190A8LL))) 64 return 1; 65 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 4, 66 make_ti(0xEDCBA9876543215FLL, 0xEDCBA98765432150LL))) 67 return 1; 68 69 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 28, 70 make_ti(0x876543215FEDCBA9LL, 0x8765432150000000LL))) 71 return 1; 72 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 29, 73 make_ti(0x0ECA8642BFDB9753LL, 0x0ECA8642A0000000LL))) 74 return 1; 75 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 30, 76 make_ti(0x1D950C857FB72EA6LL, 0x1D950C8540000000LL))) 77 return 1; 78 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 31, 79 make_ti(0x3B2A190AFF6E5D4CLL, 0x3B2A190A80000000LL))) 80 return 1; 81 82 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 32, 83 make_ti(0x76543215FEDCBA98LL, 0x7654321500000000LL))) 84 return 1; 85 86 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 33, 87 make_ti(0xECA8642BFDB97530LL, 0xECA8642A00000000LL))) 88 return 1; 89 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 34, 90 make_ti(0xD950C857FB72EA61LL, 0xD950C85400000000LL))) 91 return 1; 92 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 35, 93 make_ti(0xB2A190AFF6E5D4C3LL, 0xB2A190A800000000LL))) 94 return 1; 95 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 36, 96 make_ti(0x6543215FEDCBA987LL, 0x6543215000000000LL))) 97 return 1; 98 99 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 60, 100 make_ti(0x5FEDCBA987654321LL, 0x5000000000000000LL))) 101 return 1; 102 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 61, 103 make_ti(0xBFDB97530ECA8642LL, 0xA000000000000000LL))) 104 return 1; 105 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 62, 106 make_ti(0x7FB72EA61D950C85LL, 0x4000000000000000LL))) 107 return 1; 108 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 63, 109 make_ti(0xFF6E5D4C3B2A190ALL, 0x8000000000000000LL))) 110 return 1; 111 112 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 64, 113 make_ti(0xFEDCBA9876543215LL, 0x0000000000000000LL))) 114 return 1; 115 116 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 65, 117 make_ti(0xFDB97530ECA8642ALL, 0x0000000000000000LL))) 118 return 1; 119 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 66, 120 make_ti(0xFB72EA61D950C854LL, 0x0000000000000000LL))) 121 return 1; 122 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 67, 123 make_ti(0xF6E5D4C3B2A190A8LL, 0x0000000000000000LL))) 124 return 1; 125 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 68, 126 make_ti(0xEDCBA98765432150LL, 0x0000000000000000LL))) 127 return 1; 128 129 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 92, 130 make_ti(0x8765432150000000LL, 0x0000000000000000LL))) 131 return 1; 132 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 93, 133 make_ti(0x0ECA8642A0000000LL, 0x0000000000000000LL))) 134 return 1; 135 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 94, 136 make_ti(0x1D950C8540000000LL, 0x0000000000000000LL))) 137 return 1; 138 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 95, 139 make_ti(0x3B2A190A80000000LL, 0x0000000000000000LL))) 140 return 1; 141 142 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 96, 143 make_ti(0x7654321500000000LL, 0x0000000000000000LL))) 144 return 1; 145 146 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 97, 147 make_ti(0xECA8642A00000000LL, 0x0000000000000000LL))) 148 return 1; 149 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 98, 150 make_ti(0xD950C85400000000LL, 0x0000000000000000LL))) 151 return 1; 152 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 99, 153 make_ti(0xB2A190A800000000LL, 0x0000000000000000LL))) 154 return 1; 155 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 100, 156 make_ti(0x6543215000000000LL, 0x0000000000000000LL))) 157 return 1; 158 159 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 124, 160 make_ti(0x5000000000000000LL, 0x0000000000000000LL))) 161 return 1; 162 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 125, 163 make_ti(0xA000000000000000LL, 0x0000000000000000LL))) 164 return 1; 165 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 126, 166 make_ti(0x4000000000000000LL, 0x0000000000000000LL))) 167 return 1; 168 if (test__ashlti3(make_ti(0xFEDCBA9876543215LL, 0xFEDCBA9876543215LL), 127, 169 make_ti(0x8000000000000000LL, 0x0000000000000000LL))) 170 return 1; 171#else 172 printf("skipped\n"); 173#endif 174 return 0; 175} 176