blob: 3a79f9354719c310af1626173c7675183a0786d6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
/* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
/* { dg-options "-O2" } */
/* { dg-final { scan-assembler-not "lfd \(f?\[0-9\]+\),\[^\n\r\]*\[\n\r\]+\[ \t]*fmr f?1,\\1\[\n\r\]+\[ \t]*blr" } } */
/* Origin:Pete Steinmetz <steinmtz@us.ibm.com> */
/* PR 16796: Extraneous move. */
static const double huge = 1.0e300;
typedef int int64_t __attribute__ ((__mode__ (__DI__)));
typedef unsigned int u_int64_t __attribute__ ((__mode__ (__DI__)));
double __floor(double x)
{
union {
double dbl_val;
long int long_val;
} temp;
int64_t i0,j0;
u_int64_t i;
temp.dbl_val = x;
i0 = temp.long_val;
j0 = ((i0>>52)&0x7ff)-0x3ff;
if(j0<52) {
if(j0<0) {
if(huge+x>0.0) {
if(i0>=0) {i0=0;}
else if((i0&0x7fffffffffffffff)!=0)
{ i0=0xbff0000000000000;}
}
} else {
i = (0x000fffffffffffff)>>j0;
if((i0&i)==0) return x;
if(huge+x>0.0) {
if(i0<0) i0 += (0x0010000000000000)>>j0;
i0 &= (~i);
}
}
} else {
if (j0==0x400)
return x+x;
else
return x;
}
temp.long_val = i0;
x = temp.dbl_val;
return x;
}
|
