repo.or.cz
/
official-gcc.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
testsuite: powerpc: fix dg-do run typo
[official-gcc.git]
/
gcc
/
testsuite
/
gcc.c-torture
/
execute
/
930608-1.c
blob
1f29aa5d07bfdfc9e0fd51f1ae88afece8001337
1
void
abort
(
void
);
2
void
exit
(
int
);
3
4
double
f
(
double
a
) {}
5
double
(*
const
a
[]) (
double
) = {&
f
};
6
7
int
8
main
(
void
)
9
{
10
double
(*
p
) ();
11
p
= &
f
;
12
if
(
p
!=
a
[
0
])
13
abort
();
14
exit
(
0
);
15
}