Sign in
gnu
/
gcc
/
ab810952eb7c061e37054ddd1dfe0aa033365131
/
.
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
func-ptr-1.c
blob: 55f0e10660fcf623e0c8ee76b69cabd658f0ceb5 [
file
] [
log
] [
blame
]
static
double
f
(
float
a
);
static
double
(*
fp
)
(
float
a
);
main
()
{
fp
=
f
;
if
(
fp
((
float
)
1
)
!=
1.0
)
abort
();
exit
(
0
);
}
static
double
f
(
float
a
)
{
return
a
;
}