home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / gnu / libnix-0.8-src.lha / libnix-0.8 / sources / nix / stdlib / atexit.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-12  |  663 b   |  36 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <errno.h>
  4. #include <stabs.h>
  5.  
  6. struct atexitnode
  7. { 
  8.   struct atexitnode *next;
  9.   void (*func)(void);
  10. };
  11.  
  12. static struct atexitnode *__funclist=NULL; /* List of functions to call at exit */
  13.  
  14. int atexit(void (*func)(void))
  15. { 
  16.   struct atexitnode *node;
  17.   if((node=(struct atexitnode *)malloc(sizeof(struct atexitnode)))==NULL)
  18.   { errno=ENOMEM;
  19.     return -1; }
  20.   else
  21.   { node->next=__funclist;
  22.     node->func=func;
  23.     __funclist=node;
  24.     return 0; }
  25. }
  26.  
  27. void __exitatexit(void)
  28. {
  29.   struct atexitnode *thisf=__funclist;
  30.   while(thisf!=NULL)
  31.   { (*thisf->func)();
  32.     thisf=thisf->next; }
  33. }
  34.  
  35. ADD2EXIT(__exitatexit,0);
  36.