home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / source / iolib / maktab.c < prev    next >
Encoding:
C/C++ Source or Header  |  1975-05-13  |  385 b   |  18 lines
  1. char IEH3endm[128] {0};
  2. IEH3mtab (formatp)
  3. char **formatp;
  4. {
  5. /* make up special table of string ending characters */
  6. int i, normal;
  7. char ch;
  8. /* normally all characters end string except those listed */
  9. normal = 1;
  10. if (**formatp == '^')
  11.     {normal = 0; (*formatp)++;}
  12. for (i= 0; i < 128; i++)
  13.     IEH3endm[i] = normal;
  14. while ((ch = *((*formatp)++)) != ']')
  15.     IEH3endm[ch] = !IEH3endm[ch];
  16.  
  17. }
  18.