contrib/gcclibs/libiberty/atexit.c

   1 /* Wrapper to implement ANSI C's atexit using SunOS's on_exit. */
   2 /* This function is in the public domain.  --Mike Stump. */
   3
   4 /*
   5
   6 @deftypefn Supplemental int atexit (void (*@var{f})())
   7
   8 Causes function @var{f} to be called at exit.  Returns 0.
   9
  10 @end deftypefn
  11
  12 */
  13
  14 #include "config.h"
  15
  16 #ifdef HAVE_ON_EXIT
  17
  18 int
  19 atexit(void (*f)(void))
  20 {
  21   /* If the system doesn't provide a definition for atexit, use on_exit
  22      if the system provides that.  */
  23   on_exit (f, 0);
  24   return 0;
  25 }
  26
  27 #endif