1*3cab2bb3Spatrick// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. 2*3cab2bb3Spatrick// See https://llvm.org/LICENSE.txt for license information. 3*3cab2bb3Spatrick// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception 4*3cab2bb3Spatrick 5*3cab2bb3Spatrick#include "../assembly.h" 6*3cab2bb3Spatrick 7*3cab2bb3Spatrick// long double __floatundixf(du_int a);16 8*3cab2bb3Spatrick 9*3cab2bb3Spatrick#ifdef __i386__ 10*3cab2bb3Spatrick 11*3cab2bb3SpatrickCONST_SECTION 12*3cab2bb3Spatrick 13*3cab2bb3Spatrick .balign 16 14*3cab2bb3Spatricktwop52: 15*3cab2bb3Spatrick .quad 0x4330000000000000 16*3cab2bb3Spatrick 17*3cab2bb3Spatrick .balign 16 18*3cab2bb3Spatricktwop84_plus_twop52_neg: 19*3cab2bb3Spatrick .quad 0xc530000000100000 20*3cab2bb3Spatrick 21*3cab2bb3Spatrick .balign 16 22*3cab2bb3Spatricktwop84: 23*3cab2bb3Spatrick .quad 0x4530000000000000 24*3cab2bb3Spatrick 25*3cab2bb3Spatrick#define REL_ADDR(_a) (_a)-0b(%eax) 26*3cab2bb3Spatrick 27*3cab2bb3Spatrick.text 28*3cab2bb3Spatrick.balign 4 29*3cab2bb3SpatrickDEFINE_COMPILERRT_FUNCTION(__floatundixf) 30*3cab2bb3Spatrick calll 0f 31*3cab2bb3Spatrick0: popl %eax 32*3cab2bb3Spatrick movss 8(%esp), %xmm0 // hi 32 bits of input 33*3cab2bb3Spatrick movss 4(%esp), %xmm1 // lo 32 bits of input 34*3cab2bb3Spatrick orpd REL_ADDR(twop84), %xmm0 // 2^84 + hi (as a double) 35*3cab2bb3Spatrick orpd REL_ADDR(twop52), %xmm1 // 2^52 + lo (as a double) 36*3cab2bb3Spatrick addsd REL_ADDR(twop84_plus_twop52_neg), %xmm0 // hi - 2^52 (no rounding occurs) 37*3cab2bb3Spatrick movsd %xmm1, 4(%esp) 38*3cab2bb3Spatrick fldl 4(%esp) 39*3cab2bb3Spatrick movsd %xmm0, 4(%esp) 40*3cab2bb3Spatrick faddl 4(%esp) 41*3cab2bb3Spatrick ret 42*3cab2bb3SpatrickEND_COMPILERRT_FUNCTION(__floatundixf) 43*3cab2bb3Spatrick 44*3cab2bb3Spatrick#endif // __i386__ 45*3cab2bb3Spatrick 46*3cab2bb3SpatrickNO_EXEC_STACK_DIRECTIVE 47*3cab2bb3Spatrick 48