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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [m68k/] [slp-ice.c] - Blame information for rev 753

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


/* From PR 7872, test for optabs segfault when strict low part is present.  */
/* { dg-do compile { target m68k-*-* } }  */
/* { dg-options "-O0" }  */
extern void (**table)(void);
 
typedef unsigned short uw16;
typedef unsigned int gshort;
 
register uw16 *pc asm("%a4");
register gshort code asm("%d6");
 
void QMExecuteLoop(uw16 *oldPC)
{
  table[code=(*(uw16*)(pc++))]();
}

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* From PR 7872, test for optabs segfault when strict low part is present. */`
2			`/* { dg-do compile { target m68k-- } } */`
3			`/* { dg-options "-O0" } */`
4			`extern void (**table)(void);`
5
6			`typedef unsigned short uw16;`
7			`typedef unsigned int gshort;`
8
9			`register uw16 *pc asm("%a4");`
10			`register gshort code asm("%d6");`
11
12			`void QMExecuteLoop(uw16 *oldPC)`
13			`{`
14			`table[code=((uw16)(pc++))]();`
15			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [m68k/] [slp-ice.c] - Blame information for rev 753