| Last change
 on this file since 3219 was             2, checked in by bird, 23 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 |  | 
|---|
| 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(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.