(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.dg/
cleanup-2.c
       1  /* { dg-do run } */
       2  /* { dg-options "" } */
       3  /* Verify that cleanup works in the most basic of ways.  */
       4  
       5  extern void exit(int);
       6  extern void abort(void);
       7  
       8  static void handler(void *p __attribute__((unused)))
       9  {
      10    exit (0);
      11  }
      12  
      13  static void doit(void)
      14  {
      15    int x __attribute__((cleanup (handler)));
      16  }
      17  
      18  int main()
      19  {
      20    doit ();
      21    abort ();
      22  }