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

   1: # include   <sccs.h>
   2: 
   3: SCCSID(@(#)tTf.c	8.1	12/31/84)
   4: 
   5: tTf(m, n)
   6: {
   7:     extern char tTany;
   8:     extern short    *tT;
   9: 
  10:     if (!tTany)
  11:         return (0);
  12:     if (n < 0)
  13:         return (tT[m]);
  14:     else
  15:         return ((tT[m] >> n) & 01);
  16: }

Defined functions