mirror of
https://github.com/nArnoSNES/tcc-65816.git
synced 2024-06-12 13:29:29 +00:00
12 lines
145 B
C
12 lines
145 B
C
double f (double a) {}
|
|
double (* const a[]) (double) = {&f};
|
|
|
|
main ()
|
|
{
|
|
double (*p) ();
|
|
p = &f;
|
|
if (p != a[0])
|
|
abort ();
|
|
exit (0);
|
|
}
|