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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20070424-1.c] - Rev 688

Compare with Previous | Blame | View Log

extern void abort (void);
extern void exit (int);
 
void do_exit (void) { exit (0); }
void do_abort (void) { abort (); }
 
void foo (int x, int a)
{
  if (x < a)
    goto doit;
  do_exit ();
  if (x != a)
    goto doit;
 
  /* else */
  do_abort ();
  return;
 
doit:
  do_abort ();
}
 
int main()
{
  foo (1, 0);
  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.