Sign in
fuchsia
/
third_party
/
github.com
/
llvm
/
llvm-test-suite
/
f8cce5587c37960f53d26daff9cf39ef18330059
/
.
/
SingleSource
/
Regression
/
C
/
gcc-c-torture
/
execute
/
921208-1.c
blob: 143ef63b0c9c0d9fac1e5d2b7a9004e27d07c602 [
file
] [
log
] [
blame
]
double
f
(
double
x
)
{
return
x
*
x
;
}
double
Int
(
double
(*
f
)(
double
),
double
a
)
{
return
(*
f
)(
a
);
}
main
()
{
if
(
Int
(&
f
,
2.0
)
!=
4.0
)
abort
();
exit
(
0
);
}