Subversion Repositories openrisc

/* { dg-do run } */

/* { dg-options "" } */

/* Verify that cleanup works in the most basic of ways.  */

extern "C" void exit(int);

extern "C" void abort(void);

static void handler(void *p __attribute__((unused)))

{

  exit (0);

}

static void doit(void)

{

  int x __attribute__((cleanup (handler)));

}

int main()

{

  doit ();

  abort ();

}