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