blob: 29f150e315d7a5e416c1d1b27fa280d153307944 (
plain)
1
2
3
4
5
6
7
8
|
* software is freely granted, provided that this notice
/*
* scalbn(x,n) returns x* 2**n computed by exponent
* manipulation rather than by actually performing an
int32_t k,hx,lx;
x *= two54;
k = ((hx&0x7ff00000)>>20) - 54;
k = k+n;
|