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
atexit(void (* f)(void))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
28