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

   1: #ifndef lint
   2: static char sccsid[] = "@(#)t9.c	4.2 8/11/83";
   3: #endif
   4: 
   5:  /* t9.c: write lines for tables over 200 lines */
   6: # include "t..c"
   7: static useln;
   8: yetmore()
   9: {
  10: for(useln=0; useln<MAXLIN && table[useln]==0; useln++);
  11: if (useln>=MAXLIN)
  12:     error("Wierd.  No data in table.");
  13: table[0]=table[useln];
  14: for(useln=nlin-1; useln>=0 && (fullbot[useln] || instead[useln]); useln--);
  15: if (useln<0)
  16:     error("Wierd.  No real lines in table.");
  17: domore(leftover);
  18: while (gets1(cstore=cspace) && domore(cstore))
  19:     ;
  20: last =cstore;
  21: return;
  22: }
  23: domore(dataln)
  24:     char *dataln;
  25: {
  26:     int icol, ch;
  27: if (prefix(".TE", dataln))
  28:     return(0);
  29: if (dataln[0] == '.' && !isdigit(dataln[1]))
  30:     {
  31:     puts(dataln);
  32:     return(1);
  33:     }
  34: instead[0]= (char *) 0;
  35: fullbot[0]=0;
  36: if (dataln[1]==0)
  37: switch(dataln[0])
  38:     {
  39:     case '_': fullbot[0]= '-'; putline(useln,0);  return(1);
  40:     case '=': fullbot[0]= '='; putline(useln, 0); return(1);
  41:     }
  42: for (icol = 0; icol <ncol; icol++)
  43:     {
  44:     table[0][icol].col = dataln;
  45:     table[0][icol].rcol=0;
  46:     for(; (ch= *dataln) != '\0' && ch != tab; dataln++)
  47:             ;
  48:     *dataln++ = '\0';
  49:     switch(ctype(useln,icol))
  50:         {
  51:         case 'n':
  52:             table[0][icol].rcol = maknew(table[0][icol].col);
  53:             break;
  54:         case 'a':
  55:             table[0][icol].rcol = table[0][icol].col;
  56:             table[0][icol].col= "";
  57:             break;
  58:         }
  59:     while (ctype(useln,icol+1)== 's') /* spanning */
  60:         table[0][++icol].col = "";
  61:     if (ch == '\0') break;
  62:     }
  63: while (++icol <ncol)
  64:     table[0][icol].col = "";
  65: putline(useln,0);
  66: return(1);
  67: }

Defined functions

Defined variables