File:  [Research Unix] / researchv10no / cmd / mk / export / libc / dup2.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:34 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

#ifdef	SYSV
/*
	dup2(a, b)

	dup a as value b
*/

dup2(a, b)
{
	int poot[256];		/* greater than NFILES i hope! */
	register i, ret;

	close(b);
	for(i = 0; (poot[i] = dup(a)) >= 0; i++)
		if(poot[i] == b) break;
	ret = i;
	while(--i >= 0)
		close(poot[i]);		/* don't need 'em anymore */
	return(poot[ret]);
}
#endif

unix.superglobalmegacorp.com

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