mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-01-31 11:37:35 +00:00
fa20edc44d
- Remove most __ASSEMBLER__ __LINKER__ ifdefs - Rename libc/intrin/bits.h to libc/serialize.h - Block pthread cancelation in fchmodat() polyfill - Remove `clang-format off` statements in third_party
52 lines
1.6 KiB
C
52 lines
1.6 KiB
C
/* ===-- fixunsxfdi.c - Implement __fixunsxfdi -----------------------------===
|
|
*
|
|
* The LLVM Compiler Infrastructure
|
|
*
|
|
* This file is dual licensed under the MIT and the University of Illinois Open
|
|
* Source Licenses. See LICENSE.TXT for details.
|
|
*
|
|
* ===----------------------------------------------------------------------===
|
|
*
|
|
* This file implements __fixunsxfdi for the compiler_rt library.
|
|
*
|
|
* ===----------------------------------------------------------------------===
|
|
*/
|
|
#include "libc/math.h"
|
|
#if !(LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024)
|
|
|
|
__static_yoink("huge_compiler_rt_license");
|
|
|
|
#if !_ARCH_PPC
|
|
|
|
#include "third_party/compiler_rt/int_lib.h"
|
|
|
|
/* Returns: convert a to a unsigned long long, rounding toward zero.
|
|
* Negative values all become zero.
|
|
*/
|
|
|
|
/* Assumption: long double is an intel 80 bit floating point type padded with 6 bytes
|
|
* du_int is a 64 bit integral type
|
|
* value in long double is representable in du_int or is negative
|
|
* (no range checking performed)
|
|
*/
|
|
|
|
/* gggg gggg gggg gggg gggg gggg gggg gggg | gggg gggg gggg gggg seee eeee eeee eeee |
|
|
* 1mmm mmmm mmmm mmmm mmmm mmmm mmmm mmmm | mmmm mmmm mmmm mmmm mmmm mmmm mmmm mmmm
|
|
*/
|
|
|
|
COMPILER_RT_ABI du_int
|
|
__fixunsxfdi(long double a)
|
|
{
|
|
long_double_bits fb;
|
|
fb.f = a;
|
|
int e = (fb.u.high.s.low & 0x00007FFF) - 16383;
|
|
if (e < 0 || (fb.u.high.s.low & 0x00008000))
|
|
return 0;
|
|
if ((unsigned)e > sizeof(du_int) * CHAR_BIT)
|
|
return ~(du_int)0;
|
|
return fb.u.low.all >> (63 - e);
|
|
}
|
|
|
|
#endif
|
|
|
|
#endif /* long double is long */
|