Sign in
llvm
/
llvm-archive
/
f8b4f79771a41ee0a0f02ac90619d37ccd834915
/
.
/
clang-tests
/
gcc-4_2-testsuite
/
src
/
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
);
}