Sign in
gnu
/
gcc
/
ab810952eb7c061e37054ddd1dfe0aa033365131
/
.
/
gcc
/
testsuite
/
gcc.c-torture
/
compile
/
930611-1.c
blob: c216c096523217b92213ddb2ef08f1aac2d1ecbe [
file
] [
log
] [
blame
]
float
f
(
float
a1
)
{
union
{
float
f
;
int
l
;
}
fl1
;
fl1
.
f
=
a1
;
return
fl1
.
l
?
1.0
:
a1
;
}