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