2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>
[official-gcc.git] / gcc / testsuite / gcc.dg / pragma-ep-1.c
blobe110ff900041db5650e3d9d7b86772b0f7772b85
1 /* { dg-do compile { target *-*-osf5* } } */
2 /* { dg-final { scan-assembler "xyzzy_one" } } */
3 /* { dg-final { scan-assembler "xyzzy_two" } } */
4 /* { dg-final { scan-assembler "xyzzz_three" } } */
5 /* { dg-final { scan-assembler "four" } } */
6 /* { dg-final { scan-assembler-not "_four" } } */
8 #ifndef __PRAGMA_EXTERN_PREFIX
9 #error
10 #endif
12 #pragma extern_prefix "xyzzy_"
14 extern int one(void);
15 extern int two(void);
17 #pragma extern_prefix "xyzzz_"
19 extern int three(void);
21 #pragma extern_prefix ""
23 extern int four(void);
25 int (*p[]) (void) = {
26 one, two, three, four