[deliverable/binutils-gdb.git] / libiberty / atexit.c

/* Wrapper to implement ANSI C's atexit using SunOS's on_exit. */
/* This function is in the public domain.  --Mike Stump. */

/*

@deftypefn Supplemental int atexit (void (*@var{f})())

Causes function @var{f} to be called at exit.  Returns 0.

@end deftypefn

*/

#include "config.h"

#ifdef HAVE_ON_EXIT

int
atexit(f)
     void (*f)();
{
  /* If the system doesn't provide a definition for atexit, use on_exit
     if the system provides that.  */
  on_exit (f, 0);
  return 0;
}

#endif
Commit	Line	Data
252b5132 RH	1	/* Wrapper to implement ANSI C's atexit using SunOS's on_exit. */
	2	/* This function is in the public domain. --Mike Stump. */
	3
39423523 DD	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
252b5132 RH	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