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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr36141.c] - Blame information for rev 717

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


extern void ffi_closure_unix (void);
ffi_prep_closure_loc (void)
{
  struct ia64_fd
  {
    unsigned long long code_pointer;
    unsigned long long gp;
  };
  struct ffi_ia64_trampoline_struct
  {
    unsigned long long code_pointer;
  };
  struct ffi_ia64_trampoline_struct *tramp;
  struct ia64_fd *fd;
  fd = (struct ia64_fd *)(void *)ffi_closure_unix;
  tramp->code_pointer = fd->code_pointer;
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`extern void ffi_closure_unix (void);`
2			`ffi_prep_closure_loc (void)`
3			`{`
4			`struct ia64_fd`
5			`{`
6			`unsigned long long code_pointer;`
7			`unsigned long long gp;`
8			`};`
9			`struct ffi_ia64_trampoline_struct`
10			`{`
11			`unsigned long long code_pointer;`
12			`};`
13			`struct ffi_ia64_trampoline_struct *tramp;`
14			`struct ia64_fd *fd;`
15			`fd = (struct ia64_fd )(void )ffi_closure_unix;`
16			`tramp->code_pointer = fd->code_pointer;`
17			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr36141.c] - Blame information for rev 717