* testsuite/libgomp.fortran/vla7.f90: Add -w to options.
[official-gcc.git] / gcc / testsuite / gcc.dg / pragma-re-4.c
blob9b5a26d20624ab8f7b574c04107153f218640f07
1 /* Copyright (C) 2006 Free Software Foundation, Inc. */
2 /* Contributed by Carlos O'Donell on 2006-01-27 */
4 /* Origin: Carlos O'Donell <carlos@codesourcery.com> */
5 /* { dg-do compile { target *-*-solaris* } } */
6 /* { dg-final { scan-assembler "_foo" } } */
7 /* { dg-final { scan-assembler-not "_foo64" } } */
9 #define foo _foo
10 #define foo64 _foo64
11 extern int foo(void);
12 extern int foo64(void);
13 #pragma redefine_extname foo64 foo
14 int
15 bar()
17 return (foo64());