repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Dead
[official-gcc.git]
/
gomp-20050608-branch
/
gcc
/
testsuite
/
gcc.c-torture
/
compile
/
920413-1.c
blob
45b5fc5d09cb554423796b74c332ddb3f86c46ac
1
union
u
{
double
d
;
long long
ll
;};
2
f
(
double
x
,
int
n
){
union
u v
;
v
.
d
=
x
;
if
(
n
>=
0
){
v
.
ll
<<=
63
;}
else
{
v
.
ll
+=
1
<<-
n
;
v
.
ll
>>=-
n
;}
return
v
.
ll
;}