48a924c561
The libredox 0.1.19 / redox_syscall 0.9.1 bump left 45 recipe lockfiles pinning libredox 0.1.18+rb0.3.1 and redox_syscall 0.9.0+rb0.3.1. The cookbook builds with --locked, so every affected recipe died with error: cannot update the lock file .../Cargo.lock because --locked was passed to prevent this which is what took out redox-driver-sys -- and with it every Red Bear driver -- during the redbear-full build. Regenerating the fork lockfiles was not enough; the recipes that consume the forks as path deps carry their own. This is step 6 of local/docs/FORK-BUMP-PATCHING-POLICY.md applied to the recipe layer. Also drop the hardcoded GCC version in recipes/libs/libstdcxx-v3: the literal include/c++/13.2.0 stopped resolving the moment the cross toolchain moved to 16.1.0, leaving -I pointing at a directory that does not exist. Now resolves the newest installed C++ header directory and fails loudly if there is none. Same failure class as the hardcoded 13.2.0 in mk/prefix.mk. Note: a few recipe-level Cargo.lock files (redox-driver-pci, cpufreqd, redbear-acmd/-ecmd/-ftdi) sit beside a recipe.toml whose [source] is path = "source", so they are not build inputs; redox-driver-pci's even references a redox-driver-core/Cargo.toml that does not exist. They are left alone rather than given meaning they do not have. redox-driver-sys now cooks clean.
68 lines
1.6 KiB
C
68 lines
1.6 KiB
C
/* s_floorl.c -- long double version of s_floor.c.
|
|
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
|
*/
|
|
|
|
/*
|
|
* ====================================================
|
|
* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
|
|
*
|
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
|
* Permission to use, copy, modify, and distribute this
|
|
* software is freely granted, provided that this notice
|
|
* is preserved.
|
|
* ====================================================
|
|
*/
|
|
|
|
#if defined(LIBM_SCCS) && !defined(lint)
|
|
static char rcsid[] = "$NetBSD: $";
|
|
#endif
|
|
|
|
/*
|
|
* floorq(x)
|
|
* Return x rounded toward -inf to integral value
|
|
* Method:
|
|
* Bit twiddling.
|
|
*/
|
|
|
|
#define NO_MATH_REDIRECT
|
|
|
|
#include "quadmath-imp.h"
|
|
|
|
__float128 floorq(__float128 x)
|
|
{
|
|
int64_t i0,i1,j0;
|
|
uint64_t i,j;
|
|
GET_FLT128_WORDS64(i0,i1,x);
|
|
j0 = ((i0>>48)&0x7fff)-0x3fff;
|
|
if(j0<48) {
|
|
if(j0<0) {
|
|
/* return 0*sign(x) if |x|<1 */
|
|
if(i0>=0) {i0=i1=0;}
|
|
else if(((i0&0x7fffffffffffffffLL)|i1)!=0)
|
|
{ i0=0xbfff000000000000ULL;i1=0;}
|
|
} else {
|
|
i = (0x0000ffffffffffffULL)>>j0;
|
|
if(((i0&i)|i1)==0) return x; /* x is integral */
|
|
if(i0<0) i0 += (0x0001000000000000LL)>>j0;
|
|
i0 &= (~i); i1=0;
|
|
}
|
|
} else if (j0>111) {
|
|
if(j0==0x4000) return x+x; /* inf or NaN */
|
|
else return x; /* x is integral */
|
|
} else {
|
|
i = -1ULL>>(j0-48);
|
|
if((i1&i)==0) return x; /* x is integral */
|
|
if(i0<0) {
|
|
if(j0==48) i0+=1;
|
|
else {
|
|
j = i1+(1LL<<(112-j0));
|
|
if(j<i1) i0 +=1 ; /* got a carry */
|
|
i1=j;
|
|
}
|
|
}
|
|
i1 &= (~i);
|
|
}
|
|
SET_FLT128_WORDS64(x,i0,i1);
|
|
return x;
|
|
}
|