source: trunk/src/gcc/libiberty/atexit.c@ 30

Last change on this file since 30 was 2, checked in by bird, 22 years ago

Initial revision

  • Property cvs2svn:cvs-rev set to 1.1
  • Property svn:eol-style set to native
  • Property svn:executable set to *
File size: 492 bytes
Line 
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
8Causes 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
18int
19atexit(f)
20 void (*f)();
21{
22 /* If the system doesn't provide a definition for atexit, use on_exit
23 if the system provides that. */
24 on_exit (f, 0);
25 return 0;
26}
27
28#endif
Note: See TracBrowser for help on using the repository browser.