llvm-gcc-4.0/gcc/testsuite/gcc.dg/cleanup-7.c

/* { dg-do run } */
/* APPLE LOCAL testsuite nested functions */
/* { dg-options "-O2 -g -fnested-functions" } */
/* Verify that the search for function happens in the proper scope.  */

extern void exit(int);
extern void abort(void);

int main()
{
  auto void xyzzy(void *p __attribute__((unused)))
  {
    exit (0);
  }

  auto void doit ()
  {
    int x __attribute__((cleanup (xyzzy)));
  }

  doit ();
  abort ();
}