Sign in
gnu
/
gcc
/
refs/tags/basepoints/gcc-13
/
.
/
gcc
/
testsuite
/
gdc.test
/
compilable
/
b18197.d
blob: c6f92e11459488f91838ba022475f45430929e3c [
file
] [
log
] [
blame
]
// REQUIRED_ARGS: -c -m32 -O -inline
struct
A
{
double
a
;
}
A makeA
(
double
value
)
{
return
A
(
value
);
}
double
test
(
double
x
)
{
ulong
p
=
*
cast
(
ulong
*)&
x
;
return
makeA
(
x
).
a
;
}