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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.base/] [so-indr-cl.c] - Rev 157

Compare with Previous | Blame | View Log

/* This program is linked against SOM shared libraries, which the loader
   automatically loads along with the program itself).
   */
 
#include <stdio.h>
#ifdef PROTOTYPES
extern "C" int solib_main (int);
 
static int
solib_wrapper (int (*function)(int))
#else
extern int solib_main (int);
 
static int
solib_wrapper (function)
  int (*function)(int);
#endif
{
  return (*function)(100);
}
 
 
int main ()
{
  int  result;
 
  /* This is an indirect call to solib_main. */
  result = solib_wrapper (solib_main);
  return 0;
}
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.