URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [g++.dg/] [other/] [pragma-re-1.C] - Blame information for rev 237

Go to most recent revision | Details | Compare with Previous | View Log


/* { dg-do compile { target *-*-solaris* } } */
/* { dg-final { scan-assembler "bar" } } */
/* { dg-final { scan-assembler-not "foo" } } */
/* { dg-final { scan-assembler "_Z3bazv" } } */
/* { dg-final { scan-assembler-not "baq" } } */
 
#ifndef __PRAGMA_REDEFINE_EXTNAME
#error
#endif
 
/* This one is expected to work.  */
#pragma redefine_extname foo bar
extern "C" int foo(void);
int (*p)(void) = foo;
 
/* This one is expected not to work (redefine_extname
   can only be applied to extern "C" names).  */
#pragma redefine_extname baz baq
extern int baz(void);
int (*q)(void) = baz;

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* { dg-do compile { target --solaris* } } */`
2			`/* { dg-final { scan-assembler "bar" } } */`
3			`/* { dg-final { scan-assembler-not "foo" } } */`
4			`/* { dg-final { scan-assembler "_Z3bazv" } } */`
5			`/* { dg-final { scan-assembler-not "baq" } } */`
6
7			`#ifndef __PRAGMA_REDEFINE_EXTNAME`
8			`#error`
9			`#endif`
10
11			`/* This one is expected to work. */`
12			`#pragma redefine_extname foo bar`
13			`extern "C" int foo(void);`
14			`int (*p)(void) = foo;`
15
16			`/* This one is expected not to work (redefine_extname`
17			`can only be applied to extern "C" names). */`
18			`#pragma redefine_extname baz baq`
19			`extern int baz(void);`
20			`int (*q)(void) = baz;`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [g++.dg/] [other/] [pragma-re-1.C] - Blame information for rev 237