Return to tTf.c CVS log

Up to [CSRG BSD Unix] / 42BSD / ingres / source / gutil

BSD 4.2

# include	<sccs.h>

SCCSID(@(#)tTf.c	7.1	2/5/81)

tTf(m, n)
{
	extern char	tTany;
	extern short	*tT;

	if (!tTany)
		return (0);
	if (n < 0)
		return (tT[m]);
	else
		return ((tT[m] >> n) & 01);
}

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