# 2.11BSD#431 - /usr/src/usr.bin/tbl/tc.c

##### Functions

    choochar          X
    point             X

       1: #ifndef lint
       2: static char sccsid[] = "@(#)tc.c	4.2 8/11/83";
       3: #endif
       4:
       5:  /* tc.c: find character not in table to delimit fields */
       6: # include "t..c"
       7: choochar()
       8: {
       9: /* choose funny characters to delimit fields */
      10: int had[128], ilin,icol, k;
      11: char *s;
      12: for(icol=0; icol<128; icol++)
      13:     had[icol]=0;
      14: F1 = F2 = 0;
      15: for(ilin=0;ilin<nlin;ilin++)
      16:     {
      17:     if (instead[ilin]) continue;
      18:     if (fullbot[ilin]) continue;
      19:     for(icol=0; icol<ncol; icol++)
      20:         {
      21:         k = ctype(ilin, icol);
      22:         if (k==0 || k == '-' || k == '=')
      23:             continue;
      24:         s = table[ilin][icol].col;
      25:         if (point(s))
      26:         while (*s)
      27:             had[*s++]=1;
      28:         s=table[ilin][icol].rcol;
      29:         if (point(s))
      30:         while (*s)
      31:             had[*s++]=1;
      32:         }
      33:     }
      34: /* choose first funny character */
      35: for(
      36:     s="\002\003\005\006\007!%&#/?,:;<=>@`^~_{}+-*ABCDEFGHIJKMNOPQRSTUVWXYZabcdefgjkoqrstwxyz";
      37:         *s; s++)
      38:     {
      39:     if (had[*s]==0)
      40:         {
      41:         F1= *s;
      42:         had[F1]=1;
      43:         break;
      44:         }
      45:     }
      46: /* choose second funny character */
      47: for(
      48:     s="\002\003\005\006\007:_~^`@;,<=>#%&!/?{}+-*ABCDEFGHIJKMNOPQRSTUVWXZabcdefgjkoqrstuwxyz";
      49:         *s; s++)
      50:     {
      51:     if (had[*s]==0)
      52:         {
      53:         F2= *s;
      54:         break;
      55:         }
      56:     }
      57: if (F1==0 || F2==0)
      58:     error("couldn't find characters to use for delimiters");
      59: return;
      60: }
      61: point(s)
      62: {
      63: return(s>= 128 || s<0);
      64: }

#### Defined functions

choochar defined in line 7; used 1 times

- in /usr/src/usr.bin/tbl/t2.c line 18

point defined in line 61; used 13 times

- in line 25-29(2)
- in /usr/src/usr.bin/tbl/t5.c line 170
- in /usr/src/usr.bin/tbl/t6.c line 189, 205
- in /usr/src/usr.bin/tbl/t7.c line 65
- in /usr/src/usr.bin/tbl/t8.c line 35, 76, 245, 264
- in /usr/src/usr.bin/tbl/tb.c line 35
- in /usr/src/usr.bin/tbl/tt.c line 83
- in /usr/src/usr.bin/tbl/tv.c line 140

#### Defined variables

sccsid defined in line 2; never used

Last modified: 1987-02-17 Generated: 2016-12-26 | Generated by src2html V0.67 page hit count: 912 |