4.3BSD/usr/ingres/source/gutil/tTf.c

Compare this file to the similar file:
Show the results in this format:

# include	<sccs.h>

SCCSID(@(#)tTf.c	8.1	12/31/84)

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);
}