Return to atexit.c CVS log

Up to [Research Unix] / researchv10no / libc / gen

researchv10 Norman

#include	<libc.h>

int (*_atexitfns[NONEXIT])();

atexit(f)
int (*f)();
{
	int i;

	for(i=0; i<NONEXIT; i++)
		if(!_atexitfns[i]){
			_atexitfns[i] = f;
			return(1);
		}
	return(0);
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.